ggsave mac .png игнорирует размер - PullRequest
0 голосов
/ 02 июня 2018

На моем Macbook Pro, в начале 2015 года, работает High Sierra (если это имеет значение) - похоже, что ggsave игнорирует мою спецификацию ширины и высоты изображения для файлов .png.У меня нет этой проблемы на машинах под управлением Windows.Вот небольшой воспроизводимый пример, хотя, опять же, эта проблема не возникнет, если вы работаете в Windows:

# Setup Workspace
library("xlsx")
library("ggplot2")

# Generate Data
plotData <- data.frame(
  x = c("a", "b", "c", "d"),
  y = c(5,8,3,9)
)

# Create Plot
p <- ggplot() +
  geom_bar(data = plotData, aes(x,y), stat = "identity")
ggsave("example.png", width = 4, height = 3, units = "in")

#Add Plot to Workbook
wb <- createWorkbook(type = "xlsx")
sheet <- createSheet(wb, sheetName = "Example")
addPicture(file.path(getwd(), "example.png"), sheet, scale = 1, startRow = 3,
           startColumn = 2)
saveWorkbook(wb, file.path(getwd(),"example.xlsx"))

Есть ли способ исправить эту проблему с помощью ggsave, если это проблема?Если нет, то может ли кто-нибудь предложить альтернативный способ сохранения графиков определенного размера для добавления в рабочую книгу с пакетом xlsx, который будет работать на компьютерах Mac и Windows?

Заранее спасибо за любую помощь!

...