< 문제 출처 >

이공학도를 위한 확률과 통계 3판 한글판

 

 

 

 

ds12.2.5-computer-system-management.txt
0.00MB

 

 

 [ 문제 ]

 

DS12.2.5 의 데이터를 이용하여 분산분석표와 결정계수를 구하고 이때 p 값을 해석하라.

 

 

 

 

 

> raw_datas <- read.table("ds12.2.5-computer-system-management.txt", header=T)
> ANOVA = aov(ActualTime~EstimatedTime, data = raw_datas)
> summary(ANOVA)
              Df Sum Sq Mean Sq F value   Pr(>F)    
EstimatedTime  1  411.3   411.3   32.75 3.03e-06 ***
Residuals     30  376.7    12.6                     
---
Signif. codes:  
0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

 

 

P-value < 0.01 이므로

귀무가설 기각, 대립가설 채택하므로

두 표본 데이터의 상관 관계가 있다고 볼 수 없다. 

 

 

R^2 = 411.26/(411.26+376.74) = 0.5219

 

 

 

 

+ Recent posts