Edit requests of Rのループ内でベクトルの要素を一つ一つ処理した場合の遅さを体感する