Home / Programs / Calculating total winnings in R | Calculation using vector | Question 3
Programming Example

Calculating total winnings in R | Calculation using vector | Question 3

👁 486 Views
💻 Practical Program
📘 Step by Step Learning

 

To understand this question please read form this question first, because it is linked

Based on the previous analysis, it looks like you had a mix of good and bad days. This is not what your ego expected, and you wonder if there may be a very tiny chance you have lost money over the week in total?

A function that helps you to answer this question is sum(). It calculates the sum of all elements of a vector. For example, to calculate the total amount of money you have lost/won with poker you do:

total_poker <- sum(poker_vector)

Instruction

  • Calculate the total amount of money that you have won/lost with roulette and assign to the variable total_roulette.
  • Now that you have the totals for roulette and poker, you can easily calculate total_week (which is the sum of all gains and losses of the week).
  • Print out total_week.

Program Code

# 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 <- sum(roulette_vector)


# Total winnings overall
total_week <- total_poker + total_roulette

# Print out total_week
total_week

Output

> # 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 <- sum(roulette_vector)
> 
> 
> # Total winnings overall
> total_week <- total_poker + total_roulette
> 
> # Print out total_week
> total_week  
[1] -84

Explanation

Calculation using vector

How to learn from this program

First read the algorithm, then study the program code line by line. After that, compare the code with the output and finally go through the explanation. This approach helps learners understand both the logic and the implementation properly.

Quick Practice Flow

Use this small plan to get the best result from the program example.

  • Read the title and topic first
  • Understand the algorithm carefully
  • Study the code line by line
  • Check the output and compare the logic

Related Programs

Explore similar programs to strengthen your understanding.
1
Area of Rectangle
2
Hello World Program in R Programming Language
3
R Program to Make a Simple Calculator
4
How to Create a data frame in R Programming Language
5
How to set all the column value by a single TRUE value in the data frame
6
How to add a new column in the existing Data frame using R language
7
Add a new column from an existing column with a calculation from the previous column
8
Arithmetic operation in R
9
Variable assignment in R
10
Variable assignment in R Question 2