23 lines
706 B
Plaintext
23 lines
706 B
Plaintext
#import std
|
|
#import nat
|
|
|
|
data =
|
|
|
|
<
|
|
12,127,28,42,39,113,42,18,44,118,44,37,113,124,37,48,127,36,29,31,125,139,131,
|
|
115,105,132,104,123,35,113,122,42,117,119,58,109,23,105,63,27,44,105,99,41,128,
|
|
121,116,125,32,61,37,127,29,113,121,58,114,126,53,114,96,25,109,7,31,141,46,13,
|
|
27,43,117,116,27,7,68,40,31,115,124,42,128,52,71,118,117,38,27,106,33,117,116,
|
|
111,40,119,47,105,57,122,109,124,115,43,120,43,27,27,18,28,48,125,107,114,34,
|
|
133,45,120,30,127,31,116,146>
|
|
|
|
stemleaf_plot =
|
|
|
|
^|T(~&,' | '--)*+ -+
|
|
^p(pad` @hS; * ==` ~-rlT,mat` *tS)@hSS+ (%nP*)^|*H/~& ^lrNCT/iota ~&,
|
|
^(*+ ^C/~&+ -:0!,~&zl)+ ^|(~&,nleq-<)*+ nleq-<&l@lK2hlPrSXS+ * division\10+-
|
|
|
|
#show+
|
|
|
|
main = stemleaf_plot data
|