Правильно размещать внешние файлы 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 слишком большим, сохраняется.

0 ответов

Другие вопросы по тегам