如何在 R 中保存 WikipediR 查询的维基文本结果?

How to save wikitext result of WikipediR query in R?

我在R中使用WikipediR包来查询维基百科,代码是这样的:

sink("output.txt",type = "output")
page_content("en","wikipedia", page_name = "Philipp Melanchthon",  
as_wikitext=TRUE)

一切顺利,但我不知道如何将标记wikitext结果保存到文件中。有什么方法可以代替使用 sink 来正确保存结果吗?

要将维基百科页面的标记源保存为文本文件,您可以这样做:

library('WikipediR');
x <- page_content('en','wikipedia',page_name='Philipp Melanchthon',as_wikitext=T);
writeLines(x$parse$wikitext$`*`,'output.txt');