我正在使用grid.table将数据框输出到pdf文件。 代码的骨架如下。 我拥有的txt文件包含有关它的所有信息。 数据框看起来像这样
股票ClosePrc PrevClosePrc PL ABC 90 80 10 DEF 100 105 -5
该文本文件有42个库存和4个颜色 添加一些标题 加上P＆amp; L
library(gridExtra)
BOD.Equity <- read.table("Equity.txt", fill = TRUE, nrows = 46)
BOD.Equity[,5] <- (BOD.Equity[,4] - BOD.Equity[,3]) * BOD.Equity[,2] / 100
names(BOD.Equity) <- c("Underlying", "Position", "Close", "Prev Close", "PL")
BOD.Equity[44,5] = sum(BOD.Equity$PL)
BOD.Equity[44,2:4] = 0
pdf(file = "Flash.pdf")
grid.table(BOD.Equity, show.rownames = FALSE)
dev.off()
问题是PDF文件仅显示从库存号11开始到最后的库存号10。换句话说，输出文件从顶部和底部11行切断前11行（10加上标题）（最后10个股票名称和最后一行是0和P＆amp; L的总和） coloumn）。 它没有帮助缩放pdf文件