คำนวณยอดรวมที่ได้/เสีย (3)
จากการวิเคราะห์ที่ผ่านมา ดูเหมือนว่าจะมีทั้งวันดีและวันแย่ปะปนกัน ซึ่งอาจไม่ตรงกับที่คาดหวังไว้ และอาจเริ่มสงสัยว่ามีโอกาสเล็กน้อยไหมที่ผลรวมทั้งสัปดาห์จะติดลบ?
ฟังก์ชันที่ช่วยตอบคำถามนี้ได้คือ sum() ซึ่งคำนวณผลรวมของทุกองค์ประกอบในเวกเตอร์ ตัวอย่างเช่น หากต้องการคำนวณยอดรวมที่ได้/เสียจากโป๊กเกอร์ ให้ใช้:
total_poker <- sum(poker_vector)
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
R เบื้องต้น
คำแนะนำการฝึกหัด
- คำนวณยอดรวมที่ได้/เสียจากรูเล็ต แล้วกำหนดค่าให้กับตัวแปร
total_roulette - เมื่อได้ยอดรวมของรูเล็ตและโป๊กเกอร์แล้ว ให้คำนวณ
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