我有一个显示大量信息的图表,我不想在空白处浪费空间。有什么方法可以减少 x 轴上点之间的绘制距离。理想情况下,我希望它们几乎可以接触。我可能可以做到这一点,将图中的每个尺寸参数(点、轴标签、注释、图例条目等)都更改为巨大的值,但我想知道是否有更简单的方法可以按照 position.dodge 左右的线进行操作?
这是一个以两种不同尺寸保存的示例,以表明它们仍然具有较高的相对距离:
library(ggplot)
plotdata <- data.frame(my_y = rnorm(3),
my_x = 1:3)
pdf("yourpath/test.pdf",
width = 4, height = 4)
ggplot(plotdata, aes(x = my_x, y = my_y)) + geom_point()
dev.off()
pdf("yourpath/test2.pdf",
width = 2, height = 2)
ggplot(plotdata, aes(x = my_x, y = my_y)) + geom_point()
dev.off()
我的回答采用与@Quinten 类似的方法,但为任何数据构建了一个函数:
xmax<-max(plotdata$my_x);ymax=max(plotdata$my_y)
xmin<-min(plotdata$my_x);ymin=min(plotdata$my_y)
pdf("C:/temp/test.pdf",
width = 4, height = 4)
ggplot(plotdata, aes(x = my_x, y = my_y)) + geom_point()+
xlim(xmin-0.1,xmax+0.1)+
ylim(ymin-0.1,ymax+0.1)
dev.off()
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句