我正在离开Word / Excel表并试图在 R 中生成一个表。我有一个数据框,我只想简单地打印成情节,同时能够遮蔽/着色细胞,并且通常与美学相结合。
x <- data.frame(row.names=paste("Name",1:10))
x[,1] <- 1:10
x[,2] <- sample(1:100,10)
x[,3] <- sample(LETTERS[1:26],10)
colnames(x) <- c("Value 1", "Value 2", "Label")
View(x)
提供了我喜欢的表格的确切格式,就像可以保存的情节一样。
我试过
plot(x,type="h")
但收到错误:
plot.default(...)出错:正式参数“type”匹配 多个实际参数
我已经看过如何输出有两列的表格,但是如何按原样绘制数据框?奖励点用于显示如何将该表粘贴在我创建的另一个散点图下方,以便输出ggsave具有散点图以及其下的表。
答案 0 :(得分:18)
试试这个。是的,使用pdf()
绘制PDF文件(例如mydf.pdf
)或png()
以绘制png文件:
library(gridExtra)
pdf("mypdf.pdf", height=6, width=4)
grid.table(x)
dev.off()
答案 1 :(得分:18)
因为我要获得奖励积分:
#Plot your table with table Grob in the library(gridExtra)
ss <- tableGrob(x)
#Make a scatterplot of your data
k <- ggplot(x,aes(x=x$"Value 1",y=x$"Value 2")) +
geom_point()
#Arrange them as you want with grid.arrange
grid.arrange(k,ss)
如果需要,您可以更改行数,列数,高度等。
祝你好运
http://cran.r-project.org/web/packages/gridExtra/gridExtra.pdf