plon1=c(4.5, 4.9, 5.4)
plon9=c(5.2, 5.4, 5.9 )
plon2=c(5.3, 5.5, 5.8 )
plon3=c(4.7, 5.1, 5.8 )
plon4=c(5.6, 6.1, 5.7 )
plon5=c(5.1, 5.0, 5.6)
plon6=c(5.1, 6.0, 5.7 )
plon7=c(5.2, 4.8, 5.5 )
plon8=c(5.2, 5.3, 5.9)
shapiro.test(plon1)
shapiro.test(plon2)
shapiro.test(plon3)
shapiro.test(plon4)
shapiro.test(plon5)
shapiro.test(plon6)
shapiro.test(plon7)
shapiro.test(plon8)
shapiro.test(plon9)
lista=list(plon1,plon2,plon3,plon4,plon5,plon6,plon7,plon8,plon9)
bartlett.test(lista)#wariancje mozna uznac za rowne
boxplot(lista,las=1,col=5)