질문: 경기도 지역 낙농 목장의 젖소가 만드는 평균 우유릐 양을 알아보기 위해 목장 10개소에 대한 평균 우유의 양을 도사하였다. 그 결과 평균이 35kg 이고 표준편차가 5kg으로 나타났다. 경기도 지역에서 상위 5%가 되려면, 평균 우유량은 최소 몇 kg이 되어야 하나요?

1. 주어진 값 입력

sample_mean <- 35
sample_std_dev <- 5
sample_size <- 10

2. t 값 계산

  • 자유도가 9인 t분포에서 t값이 95% 일때의 무게
t_value <- qt(0.95, df = sample_size - 1)

3. threshold 원하는 값 계산

threshold <- sample_mean + t_value* (sample_std_dev / sqrt(sample_size))

4. 결과 값 출력

threshold
## [1] 37.89841

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.