ggforce geom_circle 锯齿状和丑陋的外观

Question

我正在尝试使用 ggforce 来创建一个类似维恩的绘图叠加，但是圆圈看起来非常可怕。是否有可能提高它们的平滑度？我曾尝试增加 n（点数），但这似乎没有任何区别。

jdCoords %>% ggplot(aes(x,y, label=word)) +
       coord_fixed() + 
       geom_circle(aes(x0 = 0, y0 = 0.5, r = 1.25), n=180, linetype="solid", size=1, inherit.aes = FALSE) +
       geom_circle(aes(x0 = 0.75, y0 = -1, r = 1.25), n=180, linetype="dotted",size=1,inherit.aes = FALSE) +
       geom_circle(aes(x0 = -0.75, y0 = -1, r = 1.25), n=180, linetype="dashed",size=1,inherit.aes = FALSE) +
       theme_bw() + 
       theme(panel.border = element_blank(), 
         panel.grid.major = element_blank(),
         panel.grid.minor = element_blank(), 
         axis.line = element_line(colour = "black"))

Answer 1

这可能与您渲染/导出图形的方式有关。你能提供更多关于你的平台/输出渠道的信息吗？（例如，您是否保存为 PNG、PDF、...？您是否将结果包含在 Word 文档中？）下面，我使用ggsave("circles.png", dpi=600)了比通常分辨率更高的 PNG。

可重现的例子：

library(ggforce)
library(ggplot2)
ggplot() +
coord_fixed() + 
       geom_circle(aes(x0 = 0, y0 = 0.5, r = 1.25), n=180, linetype="solid", size=1, inherit.aes = FALSE) +
       geom_circle(aes(x0 = 0.75, y0 = -1, r = 1.25), n=180, linetype="dotted",size=1,inherit.aes = FALSE) +
       geom_circle(aes(x0 = -0.75, y0 = -1, r = 1.25), n=180, linetype="dashed",size=1,inherit.aes = FALSE) +
       theme_bw() + 
       theme(panel.border = element_blank(), 
         panel.grid.major = element_blank(),
         panel.grid.minor = element_blank(), 
         axis.line = element_line(colour = "black"))
ggsave("circles.png",dpi=600)