R でガウスを超えよう

幼いガウスにまつわる有名な逸話があります。ある日、授業をさぼりたかった先生が、生徒たちに 1 から 100 までの数を足すという課題を与えました。ところがガウスは、ほぼ瞬時に答えを出してしまいました。答えは 5050 です。彼はその場で、等差数列の和を求める公式を自ら導き出したのです。異なる開始値と増分を持つ等差数列の和を求める公式はほかにも存在しますが、わざわざ導出しなくても、R を使えば数列の合計を簡単に計算できます。

この演習はコースの一部です

中級 R

コースを見る

演習の手順

seq() 関数を使って、1 から 500 まで 3 刻みの数列を作成してください。生成されたベクトルを変数 seq1 に代入しましょう。
同じく seq() 関数を使って、1200 から 900 まで -7 刻みの数列を作成してください。変数 seq2 に代入しましょう。
2 つの数列の合計を計算してください。sum() 関数を 2 回使ってそれぞれの合計を足す方法と、先に数列を結合してから sum() 関数を 1 回使う方法のどちらでも構いません。結果をコンソールに出力してください。

実践的なインタラクティブ演習

このサンプルコードを完成させて、この演習に挑戦してみましょう。

# Create first sequence: seq1


# Create second sequence: seq2


# Calculate total sum of the sequences

コードを編集して実行