ToothGrowth数据集r语⾔分析1.
青春舞曲教案(1)青椒胡萝卜
attach(ToothGrowth)
head(ToothGrowth)
len supp do
汤圆馅料1 4.
2 VC 0.5
我们大家跳起来
普通话测试试题2 11.5 VC 0.5
排骨山药3 7.3 VC 0.5
4 5.8 VC 0.5
策划方案怎么做5 6.4 VC 0.5
6 10.0 VC 0.5
plot(len,col=as.numeric(supp)+do)
(2) Draw the boxplot of tho groups. Plea add legends in the graphs. boxplot(len~(supp)+do,col=1:6)
陶瓷筷子
legend("bottomright", "group",legend =c("OJ 0.5" , "VC 0.5" , "OJ 1. 0" , "VC 1.0", "OJ 2.0" , "VC 2.0") , pch =1, title ="bottomright", col=1:6)