r - 从 ggplot2 导出的 PDF 和 EPS 会导致密度图上出现白线？帮忙去除？

Question

导出为 PDF 后，我不断收到这些白线。它们在 R 中不可见，但导出后就可见。这似乎也是 mac 特定的问题。导出到 tiff 时不会出现问题。

数据:

> dput(head(newdemodf1,10))
structure(list(x = c(21L, 22L, 22L, 22L, 22L, 22L, 22L, 22L, 
22L, 22L), y = c(27L, 26L, 27L, 28L, 29L, 30L, 31L, 34L, 35L, 
36L), totaltime = c(0.0499999523162842, 0.0499999523162842, 0.379999876022339, 
0.0500004291534424, 0.0299999713897705, 0.109999895095825, 0.0499999523162842, 
0.0299999713897705, 0.0500001907348633, 0.0299999713897705)), .Names = c("x", 
"y", "totaltime"), row.names = c(NA, 10L), class = "data.frame")

library(ggplot2)
library(RColorBrewer)

ggplot(newdemodf1) +
  stat_density2d(aes(x=x, y=y, z=totaltime, fill = ..density..), 
                 geom="tile", contour = FALSE) +
  scale_fill_gradientn(colours=cols) 

然后我导出为 PDF 以导入到 adobe illustrator 中。但是，我得到了这样的情节:

如何去除白线？这涉及平滑颜色吗？或者以某种方式改变瓷砖？缺少 x,y 组合？任何帮助表示赞赏。

Answer 1

这些白线通常是您正在使用的 pdf 查看器造成的；当您放大或缩小时，它们可能看起来在移动。

您可以尝试使用“光栅”而不是“平铺”，它似乎与 Illustrator 配合使用效果更好。

set.seed(4393)
dsmall <- diamonds[sample(nrow(diamonds), 1000), ]
g1 <- ggplot(dsmall, aes(carat, price)) +
  stat_density2d(geom="tile", aes(fill = ..density..), contour = FALSE) 

g2 <- ggplot(dsmall, aes(carat, price)) +
  stat_density2d(geom="raster", aes(fill = ..density..), contour = FALSE) 

ggsave("g1.pdf",g1)
ggsave("g2.pdf",g2)