1. 통계학 시험 결과의 평균은 60점이고, 표준편차는 15점이다. 내 점수가 90점일때 상위 몇퍼센트인가?

Mean <- 60
SD <- 15
score <- 90
z_score <- (score - Mean)/ SD
print(z_score)
## [1] 2
probability <- pnorm(z_score)
upper_percentile <- 1-probability
upper_percentile *100
## [1] 2.275013