指摘、他のユーザーによって数多くの(正しい)のコメントに加えていることのために-値同じであるグローバルのための-値あなたにも得ることができることをテスト、ノートに関連付けられている-値帰無仮説のがとして分布するという事実を使用して「直接」、およびは分子関連する統計量の分母の自由度。r 2 p F p r 2 r 2 Beta(v npr2pFpr2r2vnvdFBeta(vn2,vd2)vnvdF
ベータ版ディストリビューションに関するWikipediaエントリの「他のディストリビューションから派生」サブセクションの3番目の箇条書きは、次のことを示しています。
もしと独立しており、その後。Y 〜χ 2(β )XX∼χ2(α)Y∼χ2(β)XX+Y∼Beta(α2,β2)
それで、形式でを書くことができます。Xr2XX+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 SSRSSEはχ2Vn個のVDのR2〜ベータ(VのNを
r2=1−SSESSY=SSY−SSESSY=SSRSSR+SSE
SSRSSEχ2vnvdr2∼Beta(vn2,vd2)
(もちろん、2つのカイ2乗が独立していることは示しませんでした。コメンテーターがそれについて何か言うことができるかもしれません。)
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