APL で書かれたライフゲームをネタに R に初挑戦 http://d.hatena.ne.jp/sumim/20090218/p1 Rはたしなむ程度で、ゴックンしたレベルにはほど遠いけど、書いてみた。 というか、自分が理解するために手を動かしてみた、という感じ。 life = function(m){ rot …

無理にJ言語に対応させたやり方をしていたがR言語ならではのやりかたもあった。 前回のインデックスに対応する場所をFizzで置換する処理 > a = 1:15 > replace(a,a[a%%3==0],'Fizz') [1] "1" "2" "Fizz" "4" "5" "Fizz" "7" "8" "Fizz" "10" [11] "11" "Fizz…

J言語と同じ方法をなぞってみる 1〜15をaに代入 > a = 1:15 > a [1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 3の剰余を求める > a %% 3 [1] 1 2 0 1 2 0 1 2 0 1 2 0 1 2 0 その結果を0と比較する > a %% 3 == 0 [1] FALSE FALSE TRUE FALSE FALSE TRUE FALSE …