例子：利用四種不同配方的材料A1、A2、A3、A4生産出來的元件，測得其使用壽命如下圖所示。問：四種不同配方下元件的使用壽命有無顯著差異？
R語言中的aov()函數提供了方差分析的計算，aov()函數的使用方式如下：
aov(formula,data=NULL)
其中formula是方差分析的公式，data是數據框。另外，可使用summary()列出方差分析表的詳細信息。
接下來用數據框的格式輸入數據，調用aov()函數計算方差分析，用summary()提取方差分析的信息。
> lamp<-data.frame(
X=c(1600, 1610, 1650, 1680, 1700, 1700, 1780, 1500, 1640, 1400, 1700, 1750, 1640, 1550, 1600, 1620, 1640, 1600, 1740, 1800, 1510, 1520, 1530, 1570, 1640, 1600),
A=factor(c(rep(1,7),rep(2,5),rep(3,8),rep(4,6)))
)
> lamp.aov<-aov(X~A,data = lamp)
> summary(lamp.aov)
Df Sum Sq Mean Sq F value Pr(>F)
A 3 49212 16404 2.166 0.121
繪制箱線圖
>plot(lamp$X~lamp$A)
無論是從p值還是從箱線圖都可以說明：四種材料生産出的元件的平均壽命無顯著差異。
,更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
