×
[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。
正準判別分析をやってみた3
#lda, candisでは判別が有意かどうかわからないのでちょっと調べてみたがmanova関数で検定していた。これで出力のWilksのところを見ればいいらしいが…ホンマ？
X<-as.matrix(iris[-5]) #データはRに入っているiris
manova.res<-manova(X~iris$Species)
print(summary(manova.res, test="Wilks") )
# 他の検定も可能
print(summary(manova.res, test="Pillai") )
print(summary(manova.res, test="Hotelling-Lawley") )
print(summary(manova.res, test="Roy") )
#lda, candisでは判別が有意かどうかわからないのでちょっと調べてみたがmanova関数で検定していた。これで出力のWilksのところを見ればいいらしいが…ホンマ？
X<-as.matrix(iris[-5]) #データはRに入っているiris
manova.res<-manova(X~iris$Species)
print(summary(manova.res, test="Wilks") )
# 他の検定も可能
print(summary(manova.res, test="Pillai") )
print(summary(manova.res, test="Hotelling-Lawley") )
print(summary(manova.res, test="Roy") )
PR
Comment
Trackback
Trackback URL
Comment form
