105 R -- 多重共線性のチェック(トレランス) 青木繁伸 2002/02/06 (水) 18:13
105. R -- 多重共線性のチェック(トレランス) 青木繁伸 2002/02/06 (水) 18:13 |
# 重回帰分析における多重共線性のチェック # 独立変数のみのデータ行列を引数として与えると,各変数のトレランスを返す tolerance <- function(x) { t <-1/diag(solve(cor(x))) names(t) <- paste("Var", 1:ncol(x), sep="") t } # データ例 x <- matrix(c( 1,2,4, 3,2,5, 4,3,7, 2,1,3, 5,4,7 ), ncol=3) tolerance(x) # 結果 # Var1 Var2 Var3 # 0.6730769 0.5867260 0.4466146 |
● 「統計学関連なんでもあり」の過去ログ--- 018 の目次へジャンプ
● 「統計学関連なんでもあり」の目次へジャンプ
● 直前のページへ戻る