katona https://blog.hatena.ne.jp/katona/ MEMO:はてな支店 https://katona.hatenadiary.org/ R言語 無理に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" "13" "14" "Fizz" replaceは論理値ベクトルにも対応しているのでこれでよかった > replace(a,a%%3==0,'Fizz') [1] "1" "2" "Fizz" "4" "5" "Fizz" "7" "8"… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fkatona.hatenadiary.org%2Fentry%2F20080111%2Fp1" title="ベクトル関係追記 - MEMO:はてな支店" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2008-01-11 00:00:00 rich https://katona.hatenadiary.org/entry/20080111/p1 1.0 100%