合計収支の計算(3)
これまでの分析を見ると、調子の良い日と悪い日が混在していたようです。期待していた結果とは違い、もしかしたら1週間の合計がマイナスになっているのでは?と気になってきました。
この疑問に答えるのに役立つのが sum() 関数です。この関数は、ベクトルのすべての要素の合計を計算します。たとえば、ポーカーで稼いだ(または失った)合計金額を計算するには、次のようにします。
total_poker <- sum(poker_vector)
この演習はコースの一部です
R 入門
演習の手順
- ルーレットで勝った(または負けた)合計金額を計算し、変数
total_rouletteに代入しましょう。 - ルーレットとポーカーそれぞれの合計が出たら、1週間の全損益の合計である
total_weekを計算しましょう。 total_weekを出力しましょう。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Poker and roulette winnings from Monday to Friday:
poker_vector <- c(140, -50, 20, -120, 240)
roulette_vector <- c(-24, -50, 100, -350, 10)
days_vector <- c("Monday", "Tuesday", "Wednesday", "Thursday", "Friday")
names(poker_vector) <- days_vector
names(roulette_vector) <- days_vector
# Total winnings with poker
total_poker <- sum(poker_vector)
# Total winnings with roulette
total_roulette <-
# Total winnings overall
total_week <-
# Print out total_week