table=:1 :'[ ((u stringu)&;@,[EMAIL PROTECTED],.]) ] over u/'
stringu=:1 :'5!:5<''u'' '
over=:({.;}.)@":@,
  (i.5) * table i.5
┌─┬───────────┐
│*│0 1 2  3  4│
├─┼───────────┤
│0│0 0 0  0  0│
│1│0 1 2  3  4│
│2│0 2 4  6  8│
│3│0 3 6  9 12│
│4│0 4 8 12 16│
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to