rawscore1 <- pnorm(81, 75, 6.38)
print(rawscore1)
## [1] 0.8265038
rawscore2 <-pnorm(83, 75, 6.38)
print(rawscore2)
## [1] 0.8950642
result <- rawscore2 - rawscore1
print(result)
## [1] 0.06856043
Let’s write what we have:
Mean is 78
Variation is 30.25
Standard Deviation is 5.5
Z-score is 1.28
Note, the top 10% implies that you must score a 90% or greater.
certificatescore1 <- qnorm(.9, 78, 5.5)
print(certificatescore1)
## [1] 85.04853
There is a difference between high and low income families in the mean amount of assistance families offer to their children in school-related activities
The mean amount of money spent on food by undergraduate student athletes is greater than the mean amount of money spent on food by other graduates.