r - 如何使用hexSticker创建SVG文件

我有以下代码，该代码使用hexSticker生成PNG文件：

library(ggplot2)
library(hexSticker)

p <- ggplot(aes(x = mpg, y = wt), data = mtcars) + geom_point()
p <- p + theme_void() + theme_transparent()

sticker(p, package="hexSticker", p_size=8, s_x=1, s_y=.75, s_width=1.3, s_height=1,filename="test.png")

它将生成以下PNG文件：



如何制作SVG版本？

最后，我想将图形提交给GitHub hexbin，
因此它需要满足它的标准。

最佳答案

试试下面的代码

library(ggplot2)
library(hexSticker)

p <- ggplot(aes(x = mpg, y = wt), data = mtcars) + geom_point()
p <- p + theme_void() + theme_transparent()

sticker(
        p
      , package="hexSticker"
      , p_size=8
      , s_x=1
      , s_y=.75
      , s_width=1.3
      , s_height=1
      ,filename="test.svg"
      )