Правильно размещать внешние файлы svg в ggarrange
Короче говоря, у меня есть несколькоsvg
изображения, которые я хочу использовать (и в идеале попасть в ggplot, чтобы использовать ggtitle() и так далее).
Я могу импортировать изображения с помощьюrsvg
иgrImport
, но макет как-то испортился:
rsvg::rsvg_svg("https://dev.w3.org/SVG/tools/svgweb/samples/svg-files/compuserver_msn_Ford_Focus.svg", "cairo.svg")
raw <- grImport2::readPicture("cairo.svg")
grob <- grImport2::pictureGrob(raw, x=unit(0, "cm"), y = unit(0, "cm"), just = "left", expansion = 0.05)
ggpubr::ggarrange(grob,grob,grob,grob,grob,grob, labels=c("A", "B", "C", "D","E","F"), ncol=2, nrow=3)
ggsave("cairo.pdf", width=8, height=16)
Я играл с различными параметрами pictureGrob, но проблема в том, что "ограничивающая рамка"ggarrange
помещает изображение svg слишком большим, сохраняется.