Question

在我的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机器上运行吗？

提前感谢您的帮助！

ggsave mac .png忽略大小

0 个答案: