Diğer kullanıcılar tarafından çok sayıda (doğru) Yorumlara ek olarak işaret olduğunu p için -değeri r2 ile aynıdır p küresel için-değeri F de alabilirsiniz testte, not p ilişkili -Değer r2 " şirketinden" gerçeğini kullanarak r2 boş hipotez altında olarak dağıtılır Beta(vn2,vd2), buradavnvevd, ilişkiliFstatikiçin sırasıyla pay ve payda serbestlik dereceleridir.
Beta dağıtımındaki Wikipedia girişinin Diğer dağıtımlardan türetilmiş alt bölümündeki 3. madde işareti bize şunu söyler:
Eğer X∼χ2(α) ve Y∼χ2(β) bağımsız, o zaman XX+Y∼Beta(α2,β2) .
Eh, yazabilir ki Xr2 formu.XX+Y
Let , bir değişken için kareler toplamı olduğu , Y , S S E bir gerileme karesel toplamı Y başka değişkenlere ve S S R , bir olmak "düşük karelerinin toplamı," S S R = S S , Y - S S e . Sonra
r 2 = 1 - S S DSSYYSSEYSSRSSR=SSY−SSE
Ve elbette, karelerin toplamı olanSSRveSSE, sırasıylavnvevdserbestlik dereceleriileχ2olarak dağıtılır. Bu nedenle,
r2∼Beta(vn
r2=1−SSESSY=SSY−SSESSY=SSRSSR+SSE
SSRSSEχ2vnvdr2∼Beta(vn2,vd2)
(Tabii ki, iki ki-karenin bağımsız olduğunu göstermedim. Belki bir yorumcu bu konuda bir şeyler söyleyebilir.)
R'de gösterim (@gung'dan borçlanma kodu):
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