我使用ggsave保存由ggplot生成的饼图:
pie <-ggplot(data.pie, aes(x = "", y=value, fill = target)) +
geom_bar(width=1,stat="identity") +
coord_polar("y", start=0) +
theme(legend.position = "none",
panel.background = element_blank(),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.margin = unit(0,"null"),
plot.margin = rep(unit(0,"null"),4),
axis.ticks = element_blank(),
axis.text.x = element_blank(),
axis.text.y = element_blank(),
axis.title.x = element_blank(),
axis.title.y = element_blank(),
axis.ticks.length = unit(0,"null"),
axis.ticks.margin = unit(0,"null")) +
scale_x_discrete(expand=c(0,0)) +
scale_y_discrete(expand=c(0,0))
ggsave(file=filename, plot=pie, width=8, height=8)
正如您所看到的,我已尝试从生成的.svg文件中删除空格,但没有成功。
目标是删除所有空格,这样我就可以将这个图像放在另一个图像的顶部而不会出现丑陋的空白。