linux - R 我的图表大小在 Linux 上是 Windows 上的两倍

Question

我的堆积图有一个奇怪的问题，它必须输出为 .png。我在 windows xp 和 linux mint 上有 R 3.1.3(linux 是我通过 virtual box 的客户操作系统，我的主机是 windows xp)。除了这样的设置自然缓慢之外，我的 Linux 没有其他问题。我必须使用Linux，因为它可以更好地管理语言环境；尽管安装了语言包，Windows 仍将各种字母表中的所有字符呈现为乱码。

我在 Linux(mint 17.1)上的图表大小是 Windows 上的两倍。这是因为我的linux是通过virtual box使用的吗？我没有特别的理由要安装linux，这就是为什么我把它放在一个盒子里。当我通过虚拟盒登录 Linux 时，我收到以下小消息:

您能告诉我您系统上的图表尺寸是多少吗？

结果以尺寸表示，请参阅 GSC 图表

windowsGridnoGROBnoLOESS.png is 98 kB
windowsGridyesGROBnoLOESS.png is 679kB
windowsgscGROBnoLOESS.png is 332 kB
windowsGscnoGROBnoLOESS.png is 49 kB
windowsGscnoGROByesLOESS is 49 kB
windowsgscyesGROByesLOESS.png is 340 kB

linuxGridnoGROBnoLOESS is 104kB
linuxGridyesGROBnoLOESS is 729 kB
linuxgscGROBnoLOESS is 334 kB
linuxGscnoGROBnoLOESS is 48 kB
linuxGscnoGROByesLOESS is 115kB
linuxgscyesGROByesLOESS is 805 kB 

特别是当我合并了黄土数据后，Linux 上的大小会增加，但 Windows 上的大小会减少。

我的个人图表在 Windows 上约为 700KB，在 Linux 上接近 3 MB!我的图表更接近图表 gsc，因为它们有很长的图例并且是彩色的，具有 alpha 图层和许多点以及黄土平滑。

基本图可以重现该现象:如果您不评论第一张图，则需要下载数据 here

我已经使用了arial字体以避免大小差异，但我认为这是不必要的。请随意评论有关 extrafonts 的行和 gsc 绘图主题的行。

require("ggplot2")
require("grid")
require("gridExtra")
require("extrafont")
# font_import() # import all your fonts
# fonts() #get a list of fonts
loadfonts(device = "win")


nmmaps<-read.csv("chicago-nmmaps.csv", as.is=T)

g<-ggplot(nmmaps, aes(date, temp, color=o3))+geom_point()

png(filename = "linuxGridnoGROBnoLOESS.png", width = 1920, height = 600, units = "px", pointsize = 11, bg = "white",  res = 67.5)
g
dev.off()

png(filename = "linuxGridyesGROBnoLOESS.png", width = 1920, height = 4200, units = "px", pointsize = 11, bg = "white",  res = 67.5)
grid.arrange(arrangeGrob(g,g,g,g,g,g,g,ncol=1, nrow=7))
dev.off()

gsc<- ggplot(aes(x = carat, y = price, color=cut), data = diamonds) + geom_point()+
  theme_grey(base_family = "Arial") + theme(legend.background = element_rect(fill="grey95", colour=NA))

png(filename = "linuxGscnoGROBnoLOESS.png", width = 1920, height = 600, units = "px", pointsize = 11, bg = "white",  res = 67.5)
gsc
dev.off()


png(filename = "linuxgscGROBnoLOESS.png", width = 1920, height = 4200, units = "px", pointsize = 11, bg = "white",  res = 67.5)
grid.arrange(arrangeGrob(gsc,gsc,gsc,gsc,gsc,gsc,gsc,ncol=1, nrow=7))
dev.off()



gscloess<- ggplot(aes(x = carat, y = price, color=cut), data = diamonds) + geom_point()+
  stat_smooth(method="loess", aes(group = 1), se=FALSE, span = 0.2, size=1.25, n=200, fullrange = T)+
  theme_grey(base_family = "Arial") + theme(legend.background = element_rect(fill="grey95", colour=NA))

png(filename = "linuxGscnoGROByesLOESS.png", width = 1920, height = 600, units = "px", pointsize = 11, bg = "white",  res = 67.5)
gscloess
dev.off()

png(filename = "linuxgscyesGROByesLOESS.png", width = 1920, height = 4200, units = "px", pointsize = 11, bg = "white",  res = 67.5)
grid.arrange(arrangeGrob(gscloess,gscloess,gscloess,gscloess,gscloess,gscloess,gscloess,ncol=1, nrow=7))
dev.off()

Answer 1

我使用 optipng 来减小 Linux 输出的大小，但它们仍然高于 Windows 上的输出大小。

我还必须安装xfonts-100-dpi并且一切正常，但输出非常难看。但也很轻。