R 语言绘制简单条形图
参考书籍:R数据可视化手册
1、使用barplot()函数绘制简单条形图
library(datasets)#数据来源
library(ggplot2)
barplot(BOD$demand,names.arg = BOD$Time)
数据展示 | 绘图结果 |
![]() |
2、使用ggplot()函数绘制简单条形图
library(datasets)
library(ggplot2)
ggplot(BOD,aes(x=Time,y=demand))+geom_bar(stat="identity")
ggplot(BOD,aes(x=factor(Time),y=demand))+geom_bar(stat="identity")#factor()函数将Time数据转化为分类变量
ggplot(BOD,aes(x=Time,y=demand))+geom_bar(stat="identity")+geom_bar(stat="identity",fill="lightblue",colour="black") #fill修改填充色颜色,colour修改边框颜色
数据展示 | Time是数值型 (连续型)变量 |
将Time转化为离散型变量 (分类变量) | 美化 条形图 |
![]() | ![]() |
3、绘制簇状条形图
library(gcookbook)
#library(RColorBrewer)
#其中cultivar,data是分类变量,weight是值。
ggplot(cabbage_exp,aes(x=Date,y=Weight,fill=Cultivar))+geom_bar(position = "dodge",stat ="identity" )
#添加colour修改为黑色边框,使用scale_fill_brewer()或scale_fill_manual()函数
P<-ggplot(cabbage_exp,aes(x=Date,y=Weight,fill=Cultivar))+geom_bar(position = "dodge",stat ="identity",colour="black" )
P+scale_fill_brewer(palette="Greens")
P+scale_fill_brewer(palette=1)
P+scale_fill_brewer(palette="Set2")
P+scale_fill_manual(values =c("lightpink1","lightsalmon"))
P+scale_fill_manual(values =c("419","424"))
P+scale_fill_manual(values =c("#FFAEB9","#FFA07A"))
palette="Greens" | palette=2 | palette="Set2" |
![]() | ||
"lightpink1","lightsalmon" | "419","424" | "#FFAEB9","#FFA07A" |
自我总结:
绘制简单条形图,主要有三个重要的函数:
barplot(y,names.arg=x)
# y描述条形的高度,x描述每个条形对应的标签
ggplot(data,aes(x,y))+geom_bar(stat="identity")
注意:qplot()函数也可以实现,但是我ggplot无法出图。
qplot(x,y,data,geom="bar",stat = "identity")
qplot(data$x,data$y,geom="bar",stat = "identity")
其中,如果BOD不知,可以使用help ,操作如下,
??BOD右边窗口有详细的示例
链接示例数据集:我共收集了3种方式:分别是library(datasets)、attach(mtcars)、datasets::mtcars。以上是我对简单条形图的总结,望大家批评和指正,我们一起学习。
转载本文请联系原作者获取授权,同时请注明本文来自陈睿科学网博客。
链接地址:https://wap.sciencenet.cn/blog-3511394-1381503.html?mobile=1
收藏