That can be simplified: ]d=: ^ t. i.6 1 1 0.5 0.166667 0.0416667 0.00833333 +. r.}.i.# d 0.540302 0.841471 _0.416147 0.909297 _0.989992 0.14112 _0.653644 _0.756802 0.283662 _0.958924 Linda
-----Original Message----- From: programming-boun...@forums.jsoftware.com [mailto:programming-boun...@forums.jsoftware.com] On Behalf Of Aai Sent: Friday, December 14, 2012 8:33 AM To: programm...@jsoftware.com Subject: Re: [Jprogramming] Cool roots > +. a=: (init=: r.@}.@i.@#) c |a > +. (r.@}.@i.@# (120 120 60 20 5 1 | a)) > It probably should be +. a=: (init=: r.@}.@i.@#) c |d 0.540302 0.841471 _0.416147 0.909297 _0.989992 0.14112 _0.653644 _0.756802 0.283662 _0.958924 the trailing 1s shown in the first row of the text are a little enigma. -- Met vriendelijke groet, @@i = Arie Groeneveld ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm