You somehow lost the leaf 1 from data item 151 (an "off by 1" error?). Last row of answer should be 15 1 _ _ _ Sorry about line wrap. --Kip
NB. Actually... this isn't any shorter, but it feels cleaner: 2-~(+1%*)/:~(~.@[,./:~@}:/.)/|:>:0 10#:data,10*i.>./<.data%10 0 7 9 _ _ 1 2 4 7 9 2 0 4 _ _ 3 2 6 _ _ 4 7 7 _ _ 5 2 _ _ _ 6 4 _ _ _ 7 2 _ _ _ 8 0 7 _ _ 9 0 _ _ _ 10 _ _ _ _ 11 _ _ _ _ 12 _ _ _ _ 13 3 _ _ _ 14 _ _ _ _ 15 _ _ _ _ NB. Thanks, stemplot data 0|7 9 1|2 4 7 9 2|0 4 3|2 6 4|7 7 5|2 6|4 7|2 8|0 7 9|0 10| 11| 12| 13|3 14| 15|1 data 17 133 151 47 12 19 52 80 32 87 24 14 20 90 9 47 72 7 36 64 On Wednesday, May 7, 2014, Raul Miller <[email protected]> wrote: > Actually... this isn't any shorter, but it feels cleaner: > 2-~(+1%*)/:~(~.@[,./:~@}:/.)/|:>:0 10#:data,10*i.>./<.data%10 > > Thanks, > > -- > Raul > > > On Wed, May 7, 2014 at 4:11 AM, Raul Miller > <[email protected]<javascript:;>> > wrote: > > On Wed, May 7, 2014 at 3:59 AM, Kip Murray > > <[email protected]<javascript:;>> > wrote: > >> Can you add in the "empty stems" 10 11 12 14 ? > > > > Like this? > > 2-~(+1%*)/:~(~.@[,./:~@}:/.)/|:(,0,.~1+0 i.@{>./)>:0 10#:data > > > > Thanks, > > > > -- > > Raul > ---------------------------------------------------------------------- > For information about J forums see http://www.jsoftware.com/forums.htm > -- Sent from Gmail Mobile ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
