我想围绕类别的单个级别创建一个框/矩形,并包括轴类别文本和栏本身:
正如您在照片中看到的那样,矩形延伸到网格之外并进入绘图区域以包含轴文本。我希望有一些可定制的东西,这样我就可以画圆角或不画圆角,改变颜色,并指定它的位置。
这是我用来制作情节的一些通用代码:
ggplot(mtcars, aes(x=factor(cyl)))+
geom_bar(stat="count", width=0.7, fill="steelblue")+
theme_minimal()
希望这个问题没有在某处得到解答!
最佳答案
- 对于矩形使用
annotate
和"rect"
- 要越过 x 轴,您可以将 x 轴设置为空白
- 然后添加新的准轴,
geom_text
将 y 设置为 0 或 -1。玩以适应:
p <- ggplot(mtcars, aes(x=factor(cyl)))+
geom_bar(stat="count", width=0.7, fill="steelblue")+
theme_minimal()
p + annotate("rect", xmin = 0.5, xmax = 1.5, ymin = -1, ymax = 12,
alpha = 0, color= "green") +
theme(axis.text.x = element_blank(),
axis.line.x = element_blank(),
axis.ticks.x = element_blank()) +
geom_text(aes(y = -0.5, x = factor(cyl),
label = cyl)) +
labs(title="Rectangle over x axis!",
x ="cyl", y = "count")
关于r - 在(R,ggplot2)中围绕条形图和类别绘制一个矩形,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/68640187/