これが私の現在のコードです:
dat = data.frame(matrix(c(rnorm(20), rep(c(1:5),10), rep(seq(1,4),5)), ncol=3))
colnames(dat)<- c('var1','var2','var3')
ggplot(dat, aes(y=var1,x=var2,colour=var3)) +
geom_point() + geom_smooth(method='aov',se=F)
各色のaovラインを表示したいのですが。どうやってやるの ?
summary(aov())
また、テキストファイルに表示されている行を抽出したいと思います。また、これらの仮定のテストを抽出します...つまり、ととを抽出しaov()
たいと思います。fligner.test(dat$var1~var2)
fligner.test(dat$var1~var3)
shapiro.test(residuals(aov(var1~var2*var3)))
ggplotパッケージを利用してそれをすべて行う方法はありますか、それともforループを介してすべてのデータを操作する必要がありますか?