在R中输出具有新文件名的文件

Question

我使用R来获取这些网页的XML文件。我有一个csv文件，有6000个网页链接，我有一个for循环，贯穿每个网页链接，并获取每个网页链接的XML。

现在，我需要创建6000个单独的XML文件输出。我需要将它们标记为“1page”到“6000page”。

以下是我正在使用的代码：

hf_file <- trial_href_file
hf_file$Href <- as.character(hf_file$Href)

for (i in 1:nrow(hf_file))
{
url2 = hf_file$Href[i]
h21 = GET(url2,user_agent("Gigabot/3.0    (http://www.gigablast.com/spider.html)"))%>% read_html()
data <- xmlParse(h21)
saved_html<- saveXML(data)
#write.csv(paste0(saved_html,i), file = "test.csv")
write.table(saved_html, file=paste0("C:/Users/keerthana.j/Documents/Car Database/Data", Sys.Time(), ".txt"))
#write.table(saved_html, "page_html.txt", sep=",", append = TRUE)
} 

如何为for循环运行的每个网页链接使用新名称编写输出XML txt文件？