다른 사용자가 다수의 (올바른) 의견 또한 지적하면 것을 p 대한 -value r2 받는 사람과 동일 p 세계에 대한 - 값 F 당신은 또한 얻을 수 테스트, 노트 p 과 관련된 - 값 r2 " 직접 "사실 사용 r2 귀무 가설 하에서 같이 분포 Beta(vn2,vd2), 여기서,vn및vd연관된 각각에 대한 자유도의 분자와 분모도이다F통계량이.
베타 배포판 Wikipedia 항목의 다른 배포판 에서 파생 된 세 번째 글 머리 기호 는 다음과 같이 알려줍니다.
경우 X∼χ2(α) 와 Y∼χ2(β) 독립 후 .XX+Y∼Beta(α2,β2)
우리는 그 X에 를 쓸 수 있습니다r2 형식.XX+Y
하자 변수에 대한 제곱의 총합이 될 Y는 , S S E는 의 회귀에 대한 제곱 된 에러의 합 Y 다른 변수, 및 S S R은 , 인 일 "감소 제곱의 합" S S R = S S Y - S S E . 그런 다음
r 2 = 1 − S S ESSYYSSEYSSRSSR=SSY−SSE
물론, 제곱합 인SSR과SSE는각각vn과vd자유도를가진χ2로분포됩니다. 따라서
r2~베타(vn
r2=1−SSESSY=SSY−SSESSY=SSRSSR+SSE
SSRSSEχ2vnvd
(물론, 나는 두 카이-제곱이 독립적이라는 것을 보여주지 않았습니다. 아마도 주석가가 그것에 대해 말할 수 있습니다.)
r2∼Beta(vn2,vd2)
R 데모 (@gung에서 코드 차용) :
set.seed(111)
x = runif(20)
y = 5 + rnorm(20)
cor.test(x,y)
# Pearson's product-moment correlation
#
# data: x and y
# t = 1.151, df = 18, p-value = 0.2648
# alternative hypothesis: true correlation is not equal to 0
# 95 percent confidence interval:
# -0.2043606 0.6312210
# sample estimates:
# cor
# 0.2618393
summary(lm(y~x))
# Call:
# lm(formula = y ~ x)
#
# Residuals:
# Min 1Q Median 3Q Max
# -1.6399 -0.6246 0.1968 0.5168 2.0355
#
# Coefficients:
# Estimate Std. Error t value Pr(>|t|)
# (Intercept) 4.6077 0.4534 10.163 6.96e-09 ***
# x 1.1121 0.9662 1.151 0.265
# ---
# Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
#
# Residual standard error: 1.061 on 18 degrees of freedom
# Multiple R-squared: 0.06856, Adjusted R-squared: 0.01681
# F-statistic: 1.325 on 1 and 18 DF, p-value: 0.2648
1 - pbeta(0.06856, 1/2, 18/2)
# [1] 0.2647731