1、输入数据
heartrt <- data.frame(hr=c(56,53,53,65,70,58,51,
78,62,70,73,67,75,65,
77,86,65,83,79,80,77),
class=gl(3,7,labels = c("Nonsmoker","Lightsmoker","Heavysmoker"))) #gl()生成因子
数据格式:
> head(heartrt)
hr class
1 56 Nonsmoker
2 53 Nonsmoker
3 53 Nonsmoker
4 65 Nonsmoker
5 70 Nonsmoker
6 58 Nonsmoker
2.简单绘图
boxplot1 <- ggplot(heartrt,aes(x=class,y=hr,fill=class))+geom_boxplot()
3.让图形更美观
#fill:填充颜色 color:线条颜色
boxplot1 <- ggplot(heartrt,aes(x=class,y=hr,fill=class))+
geom_boxplot()+
scale_fill_brewer(palette = "Set3")+
labs(title = &