Импорт точечного графика из PDF в R - PullRequest
0 голосов
/ 30 апреля 2019

Я пытаюсь импортировать точечный график из PDF.Изначально график был создан в R. При импорте PDF я не вижу точек рассеяния.Не уверен, что я делаю не так?Графики с линиями, кажется, работают нормально.

Игрушечный пример, демонстрирующий проблему:

pdf(file = "./temp.pdf", height = 5, width = 5)
plot(mtcars$mpg, mtcars$cyl, type = "p")
dev.off()
file.show("temp.pdf")

# same issue with ggplot
# pdf(file = "./temp.pdf", height = 5, width = 5)
# ggplot(data = mtcars, mapping = aes(x = mpg, y = cyl)) +
#   geom_point()
# dev.off()

p0 <- magick::image_read_pdf('./temp.pdf')
p0

p1 <- pdftools::pdf_render_page('./temp.pdf')
png::writePNG(p1, "temp.png")
file.show("temp.png")

И p0, и temp.png дают enter image description here

> sessionInfo()
R version 3.6.0 (2019-04-26)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 10 x64 (build 17763)

Matrix products: default

locale:
[1] LC_COLLATE=English_United States.1252  LC_CTYPE=English_United States.1252   
[3] LC_MONETARY=English_United States.1252 LC_NUMERIC=C                          
[5] LC_TIME=English_United States.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

loaded via a namespace (and not attached):
[1] compiler_3.6.0 magrittr_1.5   magick_2.0     tools_3.6.0    Rcpp_1.0.1    
[6] pdftools_2.2   qpdf_1.1       png_0.1-7      askpass_1.1

1 Ответ

0 голосов
/ 30 апреля 2019

Для любого в будущем, кто застрянет с этим, useDingbats = FALSE в функции pdf() сделал свое дело для меня, то есть

pdf(file = "./temp.pdf", height = 5, width = 5, useDingbats = FALSE)
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...