前言
上一节师兄给大家介绍了在R语言中,常用的柱状图绘图技巧!如柱状图分组、调色、堆积柱状图、柱状图加误差棒等等!这一小节师兄准备带大家玩点有意思的!把柱状图画成环状的!别看成了饼图哦!它们还是柱状图哦!
本期代码+示例数据+效果图+课程笔记,均可在公众号可视化艺术后台回复20220228获得!
本期效果展示
制作不易,欢迎点赞+在看!您的支持是师兄持续更新的动力!
绘图代码
图1
# 载入R包:
library(ggplot2)
################################
# plot1:把y轴方向扭曲了,柱子都变成了弯的:加上颜色分组:
ggplot(mpg, aes(class))+
geom_bar(aes(fill=drv))+
coord_polar(theta = "y")
ggsave("plot1.pdf", height = 6, width = 6)
# plot1.1:修饰
ggplot(mpg, aes(class))+
geom_bar(aes(fill=drv))+
coord_polar(theta = "y")+
theme_bw()+
# 调整标签字体和位置:
geom_text(hjust = 1, size = 3,
aes(x = class, y = 0, label = class, fontface="italic")) +
# 设置主题:
theme_minimal() +
# 去掉x轴和y轴标题:
xlab("") +
ylab("") +
# 调整主题:
theme(legend.position = "none", # 去掉图例
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
axis.text.y = element_blank(),
axis.text.x = element_text(color="black", face="italic"))+
# 设置y轴范围:
ylim(c(0,80))+
# 设置填充颜色:
scale_fill_manual(values = c("#1093e1","#fb901e","#fee000"))
ggsave("plot1.1.pdf", height = 6, width = 6)