WikipediaR:如何使用contribs()自动化函数?

WikipediaR:如何使用contribs()自动化函数?,r,wikipedia,R,Wikipedia,我想从1905篇维基百科文章的列表中收集关于贡献者的信息,包括每页贡献者的数量 目前,我可以为一页的贡献者数量制作一个工作脚本 library(WikipediaR) contribsWiki <- contribs(domain = "fr", page = 5916592) contribsWiki2 <- contribsWiki[["contribs"]] nrow(contribsWiki2) 图书馆(维基百科) contribsWiki这应该满足您的要求: out &

我想从1905篇维基百科文章的列表中收集关于贡献者的信息,包括每页贡献者的数量

目前,我可以为一页的贡献者数量制作一个工作脚本

library(WikipediaR)
contribsWiki <- contribs(domain = "fr", page = 5916592)
contribsWiki2 <- contribsWiki[["contribs"]]
nrow(contribsWiki2)

图书馆(维基百科)

contribsWiki这应该满足您的要求:

out <- data.frame()

for (i in 1:nrow(list_of_articles)){
id <- list_of_articles[i]
contribsWiki <- contribs(domain = "fr", page = id)
contribsWiki2 <- contribsWiki[["contribs"]]
no_of_contribs <- nrow(contribsWiki2)
out <- rbind(out,data.frame(id,no_of_contribs))
}
out