---Mike Day wrote: > These seem to me to be reasonable amendments: > q1=:(Q1 :: <./) NB. default to minimum > q3=:(Q3 :: >./) NB. default to maximum > (q1,Q2,q3) 0 1 1 > 0 1 1 > (q1,Q2,q3) 0 0 1 > 0 0 1
(Q1 :: <./) +----------+-+ |+--+--+--+|/| ||Q1|::|<.|| | |+--+--+--+| | +----------+-+ Q1 :: (<./) +--+--+------+ |Q1|::|+--+-+| | | ||<.|/|| | | |+--+-+| +--+--+------+ Did you mean to define the following? q1=: Q1 :: (<./) NB. default to minimum q3=: Q3 :: (>./) NB. default to minimum To get quartile 1 & 3 to behave like the rest of the verbs it might be worth defining them as follows: q1=: Q1"1@:|: :: (<./) q3=: Q3"1@:|: :: (>./) Now $(#,am,q1,Q2,q3,:var) 17 100?.@:$ 50 6 100 ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
