如何将数据框的每一行（参与者）导出到单独的pdf文件中？答案

【问题标题】：How to export each row (participant) of a data frame in a separate pdf file?如何将数据框的每一行（参与者）导出到单独的pdf文件中？
【发布时间】：2019-04-23 02:44:42
【问题描述】：

感谢您阅读此问题。我有一个包含 5 个参与者的数据集，其中 10 个参与者有 8 个变量。我需要将数据集的每个参与者/行导出到一个单独的 pdf 文件中，并根据参与者名称命名导出的 pdf 文件。附件是解释这个问题的解释代码。

df <- data.frame(matrix(ncol = 8, nrow = 5))
x <- c("Participants", "V1","V2", "V3",  "V4","V5", "V6","V7")
colnames(df) <- x

df$Participants= c("Elizabeth",
                   "Emily",
                   "Cristie",
                   "Orville",
                   "Janetta")
df$V1 = runif(5, min=0, max=10)
df$V2 = runif(5, min=0, max=10)
df$V3 = runif(5, min=0, max=10)
df$V4 = runif(5, min=0, max=10)
df$V5 = runif(5, min=0, max=10)
df$V6 = runif(5, min=0, max=10)
df$V7 = runif(5, min=0, max=10)

summary(df)

例如，如何将“Elizabeth”（数据集中的第一行）分数导出到“Elizabeth.pdf”文件？提前致谢。

【问题讨论】：

标签： r pdf

【解决方案1】：

基于this answer，我们可以做到以下几点：

library(gridExtra)
apply(df, 1, function(x){
  pdf(paste0(x[1], ".pdf"), width=10)
  grid.table(data.frame(t(x)))
  dev.off()
})

【讨论】：

太棒了，这正是我想要的。非常感谢。