- 已编辑
这个图来自Economisit,柱状图我会做,文字也会加,就是在不同的柱子上显示边框不知道怎么弄,大神给点建议,不胜感激!
这个图来自Economisit,柱状图我会做,文字也会加,就是在不同的柱子上显示边框不知道怎么弄,大神给点建议,不胜感激!
ggplot的话,geom_col()做柱状图,color就是边框,fill是填充的颜色。
加边框可以再多加一层geom_col()
,并改变
library(ggplot2)
library(dplyr)
df = mtcars
df$car = rownames(mtcars)
df.sort = df %>%
arrange(mpg)
df.sort %>%
ggplot(aes(x=car,y=mpg,fill=cyl))+
geom_col()+
## here comes the border:
geom_col(data= df.sort[c(2,4,6),], color="red", size=1)+
geom_text(data= df.sort[c(2,4,6),], aes(label=hp))+
scale_x_discrete(limits= df.sort$car) +
theme_classic()+
theme(axis.text.x = element_text(angle = 90, hjust = 1))+
ggtitle("Miles per gallon")
<sup>Created on 2019-12-19 by the reprex package (v0.3.0)</sup>