243 R -- 重相関係数 青木繁伸 2002/01/13 (日) 15:42
multiple.cor <- function(x) { sqrt(1-1/diag(solve(cor(x)))) } # example x <- matrix(c(1,2,3,4,3, 5,14,3,2,4, 6,5,4,6,3, 4,3,2,6,5), 5) multiple.cor(x) # returned value # [1] 0.6184644 0.5335658 0.4433471 0.5780364
● 「統計学関連なんでもあり」の過去ログ--- 017 の目次へジャンプ● 「統計学関連なんでもあり」の目次へジャンプ ● 直前のページへ戻る