> data(CO2)
> boxplot(uptake ~ Type, data=CO2)
ca = aov(uptake ~ Type, CO2)
> summary(ca) Df Sum Sq Mean Sq F value Pr(>F) Type 1 3365.5 3365.5 43.519 3.835e-09 *** Residuals 82 6341.4 77.3 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1