Hand typed rather than cut&paste, because reasons. Excuse any typos.

   i.16
0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
   *:i.16
0 1 4 9 16 25 36 49 64 81 100 121 144 169 196 225
   7<i.16
0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1
   3|.7<i.16
0 0 0 0 0 1 1 1 1 1 1 1 1 0 0 0
   _1^3|.7<i.16
1 1 1 1 1 _1 _1 _1 _1 _1 _1 _1 _1 1 1 1
   (*: +/ .* _1^3|.7<])i.16
0

Fun stuff...

(Motivated by a twitter post.)

;)

-- 
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to