パスカルの三角形、もう少し

epicsさんの続・パスカルの三角形の下の方に「挫折した方法」というのがあったので、そこから発展させてみました。ちょっと発想を変えまして…。

(1..9).inject([[1]]) {|c, n|
  c << eval(c[n - 1].inject("[0+") {|s, k| s + "#{k},#{k}+"} + "0]")
}.each {|line|
  p line
}

だめかしらん♪
実行結果です。

[1]
[1, 1]
[1, 2, 1]
[1, 3, 3, 1]
[1, 4, 6, 4, 1]
[1, 5, 10, 10, 5, 1]
[1, 6, 15, 20, 15, 6, 1]
[1, 7, 21, 35, 35, 21, 7, 1]
[1, 8, 28, 56, 70, 56, 28, 8, 1]
[1, 9, 36, 84, 126, 126, 84, 36, 9, 1]