r - 创建一个PDF表格

Question

有没有一种方法可以像生成图一样(例如，使用pdf()或ggsave())从R中生成表格的PDF？我意识到可以使用其他程序(使用sweave等)来实现某些方法，但是我只想从R中生成它。

Answer 1

是的，因为您可以将文本放入图形中，因此也可以放入pdf设备中。

最好的包装器可能是Greg Warnes的受信任gplots软件包中的textplot()函数。以下是其帮助页面的示例部分的开头:

# show R version information
textplot(version)
# show the alphabet as a single string
textplot( paste(letters[1:26], collapse=" ") )

# show the alphabet as a matrix 
textplot( matrix(letters[1:26], ncol=2))

### Make a nice 4 way display with two plots and two text summaries 
data(iris)  
par(mfrow=c(2,2))   
plot( Sepal.Length ~ Species, data=iris, border="blue", col="cyan",   
      main="Boxplot of Sepal Length by Species" )    
plotmeans(Sepal.Length ~ Species, data=iris, barwidth=2, connect=FALSE,
          main="Means and 95\% Confidence Intervals\nof Sepal Length by Species")

info <- sapply(split(iris$Sepal.Length, iris$Species),
               function(x) round(c(Mean=mean(x), SD=sd(x), N=gdata::nobs(x)),2))

textplot( info, valign="top"  )
title("Sepal Length by Species")

reg <- lm( Sepal.Length ~ Species, data=iris )
textplot( capture.output(summary(reg)), valign="top")
title("Regression of Sepal Length by Species")

par(mfrow=c(1,1))