导出为pdf的ggplot2条形图由段而不是实心形状组成

Question

我的问题是，当我将ggplot条形图输出为pdf并将其导入illustrator时，每个条形图由许多细小的部分组成，而不是单个实体形状。如何在插图画家中或在R？

中导出时将条形图转换为实体形状

R代码：

library("ggplot2")
data(diamonds)
gplot <- ggplot(diamonds, aes(cut,carat)) + geom_bar(stat="identity")
ggsave("gplot.pdf",gplot)

导入Illustrator的pdf截图：

Answer 1

问题是geom_bar正在使用position="stack"绘制彼此相邻的所有小条，以堆叠到大栏。您可以通过预先汇总数据为每个类别绘制一个条形图：

library(dplyr)
diam = diamonds %>% group_by(cut) %>% summarize(carat = sum(carat))

g2 = ggplot(diam, aes(x = cut, y = carat)) + geom_bar(stat = "identity")
ggsave("gplot2.pdf", g2)

这样做的好处是可以更快地渲染PDF，也可以将图形打印到图形设备上。