library(ggplot2)
## Warning: package 'ggplot2' was built under R version 4.1.2
#载入所有的数据集,以下两行是示例。
install.packages("gcookbook")
## Installing gcookbook [2.0] ...
## OK [linked cache]
library(gcookbook)
pg_mean <- pg_mean
#画图
ggplot(pg_mean,aes(x=group,y=weight))+geom_bar(stat = "identity")
aes中如果只给x,默认统计的是X里每个变量出现的次数。
如果给了x和y,
必须指定stat=“identity”,表示一个x对应一个y.即identity提取横坐标x对应的y值。
*stat=“count”(默认),表示一个X对应落到该X的样本数,即count提取横坐标x的频数。
BOD <- BOD
ggplot(BOD,aes(Time, demand))+geom_bar(stat = "identity")
#去掉空格-把连续型变量变成因子型factor()
ggplot(BOD,aes(factor(Time), demand))+geom_bar(stat = "identity")
#修改填充fill和描边color
ggplot(pg_mean,aes(group,weight))+
geom_bar(stat = "identity",fill="lightblue",color="black")
#不同组用不同颜色
cabbage_exp <- cabbage_exp #第一列和第二列很明显是分类变量。
ggplot(cabbage_exp,aes(Date,fill=Cultivar))+geom_bar(position = "dodge")
fill中的Cultivar是根据第一列的分组变量命名的,没有y,也没有指定stat,所以默认是count,表Date变量中每个元素出现的次数即频数。
指图像的微调,最常见的应用是在分组的柱形图中,因为分组的柱形图会产生组内堆积和不堆积两种主要效果。position常用参数值:stack和dodge.
使用的是scale_color_brewer()-改变描边颜色, scale_fill_brewer()-改变填充颜色.
#scale_fill_brewer()修改颜色模式
ggplot(cabbage_exp,aes(Date, Weight, fill=Cultivar))+
geom_bar(position = "dodge",stat = "identity", color = "black")+
scale_fill_brewer(palette = "Pastel1")
#查看调色板
RColorBrewer::display.brewer.all()