Sparkline in unicode: Difference between revisions
m
→{{header|Mathematica}}
m (change for 1.0 version) |
|||
Line 1,596:
</pre >
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>toSparkline[data_String] := FromCharacterCode[Round[7 Rescale@Flatten@ImportString[data, "Table", "FieldSeparators" -> {" ", ","}]] + 16^^2581];</lang>
<pre>
| |||