Poor Quality Sticker when Saving on Windows

[thomas-neitmann]

In the process of creating a sticker for my {ggcharts} package I discovered that the png() device has very poor defaults on Windows. Here's what my sticker looked like when saving with sticker(). As you can see the lines are very ragged.

I ended up doing this to get a high-quality sticker: Notice the arguments passed to type and antialias.

hex <- sticker()
png(
  filename = "sticker.png",
  width = 43.9,
  height = 50.8,
  bg = "transparent",
  units = "mm",
  type = "cairo-png",
  antialias = "subpixel",
  res = 300
)
print(hex)
dev.off()

It would be great if hexSticker could use png() rather than ggsave() and set the type and antialias parameters as I did on Windows.