使用R降价或其他方法批量生成PDF文件?

时间:2019-09-08 20:58:51

标签: r r-markdown

我有以下数据集:

Name Score
Amy    A   
Bob    B
Charlie C

我想生成三个PDF文件:

第一个:Amy.pdf,内容为“ Amy,您对MATH 101的得分是A。”

第二个:Bob.pdf,内容为“鲍勃,您对MATH 101的得分是B。”

第三名:Charlie.pdf,内容为“查理,您的MATH 101成绩为C。”

是否只有一个R或R降价文件可以做到这一点?实际数据集中有数百个人。

1 个答案:

答案 0 :(得分:0)

一种实现方法是将其创建为图形并将其导出为pdf:

数据

d <- structure(list(Name = structure(1:3, .Label = c("Amy", "Bob", 
"Charlie"), class = "factor"), Score = structure(1:3, .Label = c("A", 
"B", "C"), class = "factor")), class = "data.frame", row.names = c(NA, 
-3L))

执行操作

for(i in 1:nrow(d)){
  pdf(file = paste0(d[i, "Name"], ".pdf"))
  plot(0:1, 1:0, bty = "n", type = "n", axes = F, xlab = "", ylab = "")
  text(.5, .5, paste0(d[i, "Name"], ", your score for MATH 101 is ", d[i, "Score"]))
  dev.off()
}