sample3.R の出力結果を追加