我想将数据框导出为(png)图像。我已尝试使用此代码,但表格会垂直剪切。
library(ggplot2)
library(gridExtra)
df <- data.frame(a=1:30, b=1:30)
png("test.png")
p<-tableGrob(df)
grid.arrange(p)
dev.off()
有没有办法避免这种行为,而无需手动设置图像的大小?
答案 0 :(得分:14)
您可以通过指定高度和宽度来更改此行为。
png("test.png", height=1000, width=200)
p<-tableGrob(df)
grid.arrange(p)
dev.off()
无论如何,将表格保存为图片通常不是很有帮助。
答案 1 :(得分:6)
你可以这样做:
library(gridExtra)
png("test.png", height = 50*nrow(df), width = 200*ncol(df))
grid.table(df)
dev.off()
答案 2 :(得分:0)
这很好用:
library(gridExtra)
df = data.frame("variables" = c("d_agr","d_def","d_frig","d_hidro","d_roads","d_silos"),
"coeficient" = c(0.18,0.19,-0.01,-0.25,-0.17,0.09))
png("output.png", width=480,height=480,bg = "white")
grid.table(df)
dev.off()