読者です 読者をやめる 読者になる 読者になる

廿TT

譬如水怙牛過窓櫺 頭角四蹄都過了 因甚麼尾巴過不得

J 原語で九九の表を作る

こんなに短く書ける言語は他には存在しない!?

> 1:9 %*% t(1:9)
      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9]
 [1,]    1    2    3    4    5    6    7    8    9
 [2,]    2    4    6    8   10   12   14   16   18
 [3,]    3    6    9   12   15   18   21   24   27
 [4,]    4    8   12   16   20   24   28   32   36
 [5,]    5   10   15   20   25   30   35   40   45
 [6,]    6   12   18   24   30   36   42   48   54
 [7,]    7   14   21   28   35   42   49   56   63
 [8,]    8   16   24   32   40   48   56   64   72
 [9,]    9   18   27   36   45   54   63   72   81
Rで9×9掛け算表を表示する(ネタ) - Qiita

に対して,

1:9%o%1:9 がもっと短い(同,9文字)

掛け算表 - 裏 RjpWiki

というコメントがついていたので、あれ? J ならもっと短くなるんじゃね? と思ったが, 負けました. 16文字.

   (>:i.9)*/(>:i.9) 
1  2  3  4  5  6  7  8  9
2  4  6  8 10 12 14 16 18
3  6  9 12 15 18 21 24 27
4  8 12 16 20 24 28 32 36
5 10 15 20 25 30 35 40 45
6 12 18 24 30 36 42 48 54
7 14 21 28 35 42 49 56 63
8 16 24 32 40 48 56 64 72
9 18 27 36 45 54 63 72 81
  • i.9 が 0,1,...,8 の 9 個の要素からなるベクトル.
  • >: がインクリメント. 0,1,...,8 を 1,2,..,9 にしてる.
  • */ が外積. R の %o% と同じ.

読めねえよ.