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 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

🖥 Program 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
📚 Learning Subject

Master Programming Through Practical Examples

Improve your coding logic, problem-solving skills and programming confidence by practicing real-world examples with explanations.

💡 Beginner Friendly
🧠 Logic Building
⚡ Practical Coding
Start Learning →

🎯 How to learn from this example

First understand the algorithm carefully. Then study the program line-by-line and compare it with the output. Finally, review the explanation section to strengthen your logic and programming understanding.

🔥 Practice suggestion

Rewrite the program without looking at the code. Modify values, conditions or logic and run it again. This helps improve confidence and strengthens coding skills much faster.

⚡ Quick Practice Flow

Follow this learning sequence for better understanding.

  • Read the topic carefully
  • Understand the algorithm
  • Study the code line-by-line
  • Check the output result
  • Practice by modifying logic

📚 Related Programs

Explore more practical programming examples.
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