** Question 16 Given a vector goals <- c(2, 3, 1,
4,2,0,1,4,3,2) that represents the number of goals scored per game**
What is the total number of goals scored? What is the average
number of goals scored per game? What is the maximum number number of
goals scored in a single game? What is the minimum number of goals
scored in a single game?
goals <- c(2, 3, 1, 4,2,0,1,4,3,2)
total_goals<-sum(goals)
average_goals_per_game<-mean(goals)
max_goals<-max(goals)
min_goals<-min(goals)
"A. total goals in all games:"
[1] "A. total goals in all games:"
total_goals
[1] 22
"B. average goals per game:"
[1] "B. average goals per game:"
average_goals_per_game
[1] 2.2
"C. max goals in a a single game:"
[1] "C. max goals in a a single game:"
max_goals
[1] 4
"D. minimum goals in a single game"
[1] "D. minimum goals in a single game"
min_goals
[1] 0
LS0tCnRpdGxlOiAiUiBDb21wb25lbnQgb2YgU3BvcnRzIEFuYWx5dGljcyBNaWR0ZXJtIgpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sKLS0tCioqIFF1ZXN0aW9uIDE2KioKKipHaXZlbiBhIHZlY3RvciBnb2FscyA8LSBjKDIsIDMsIDEsIDQsMiwwLDEsNCwzLDIpIHRoYXQgcmVwcmVzZW50cyB0aGUgbnVtYmVyIG9mIGdvYWxzIHNjb3JlZCBwZXIgZ2FtZSoqCgoqKldoYXQgaXMgdGhlIHRvdGFsIG51bWJlciBvZiBnb2FscyBzY29yZWQ/CldoYXQgaXMgdGhlIGF2ZXJhZ2UgbnVtYmVyIG9mIGdvYWxzIHNjb3JlZCBwZXIgZ2FtZT8KV2hhdCBpcyB0aGUgbWF4aW11bSBudW1iZXIgbnVtYmVyIG9mIGdvYWxzIHNjb3JlZCBpbiBhIHNpbmdsZSBnYW1lPwpXaGF0IGlzIHRoZSBtaW5pbXVtIG51bWJlciBvZiBnb2FscyBzY29yZWQgaW4gYSBzaW5nbGUgZ2FtZT8qKgpgYGB7cn0KZ29hbHMgPC0gYygyLCAzLCAxLCA0LDIsMCwxLDQsMywyKQp0b3RhbF9nb2Fsczwtc3VtKGdvYWxzKQphdmVyYWdlX2dvYWxzX3Blcl9nYW1lPC1tZWFuKGdvYWxzKQptYXhfZ29hbHM8LW1heChnb2FscykKbWluX2dvYWxzPC1taW4oZ29hbHMpCiJBLiB0b3RhbCBnb2FscyBpbiBhbGwgZ2FtZXM6Igp0b3RhbF9nb2FscwoiQi4gYXZlcmFnZSBnb2FscyBwZXIgZ2FtZToiCmF2ZXJhZ2VfZ29hbHNfcGVyX2dhbWUKIkMuIG1heCBnb2FscyBpbiBhIGEgc2luZ2xlIGdhbWU6IgptYXhfZ29hbHMKIkQuIG1pbmltdW0gZ29hbHMgaW4gYSBzaW5nbGUgZ2FtZSIKbWluX2dvYWxzCmBgYAoKCmBgYHtyfQpgYGAKCgpgYGB7cn0KYGBgCgoKYGBge3J9CmBgYAoKCmBgYHtyfQpgYGAKCgpgYGB7cn0KYGBgCgo=