Sparkline in unicode: Difference between revisions

m
Add correct syntax highlighting
No edit summary
m (Add correct syntax highlighting)
Line 2,125:
 
=={{header|R}}==
<lang Rrsplus>
bars <- intToUtf8(seq(0x2581, 0x2588), multiple = T) # ▁ ▂ ▃ ▄ ▅ ▆ ▇ █
n_chars <- length(bars)
Line 2,151:
</lang>
{{out}}
<lang Rr>
[1] "▂▁▄▃▆▅█▇"
[1] "▁▂▃▄▅▆▇█▇▆▅▄▃▂▁"