Another way: 1(4 : '(2-~/\])^:x]y')3^~i.10 1 7 19 37 61 91 127 169 217 2(4 : '(2-~/\])^:x]y')3^~i.10 6 12 18 24 30 36 42 48
(i.4)(4 : '(2-~/\])^:x]y')3^~i.10 0 1 8 27 64 125 216 343 512 729 1 7 19 37 61 91 127 169 217 0 6 12 18 24 30 36 42 48 0 0 6 6 6 6 6 6 6 0 0 0 On 12/12/07, Raul Miller <[EMAIL PROTECTED]> wrote: > > On Dec 12, 2007 5:13 PM, Tracy Harms <[EMAIL PROTECTED]> wrote: > > diff=: }. - }: > ... > > I want to write a verb that uses the left parameter to > > identify the order of forward difference, and the > > right for the data. > > 1 (* diff) 1 2 3 4 > 1 1 1 > _1 (* diff) 1 2 3 4 > _1 _1 _1 > > Or, if you prefer, > 1 (([ }. ]) - [EMAIL PROTECTED] }. ]) 1 2 3 4 > 1 1 1 > _1 (([ }. ]) - [EMAIL PROTECTED] }. ]) 1 2 3 4 > _1 _1 _1 > > -- > Raul > ---------------------------------------------------------------------- > For information about J forums see http://www.jsoftware.com/forums.htm > -- Devon McCormick, CFA ^me^ at acm. org is my preferred e-mail ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
