使用循环写入R中的文件

Question

我有几个变量如下:

cats <- "some long text with info"
dogs <- "some long text with info"
fish <- "some long text with info"
....

我手动将这些变量的内容写入文本文件:

write.table(cats, "info/cats.txt", sep="\t")
write.table(dogs, "info/dogs.txt", sep="\t")
....

我阅读了这个问题的答案,并尝试编写一个循环来自动编写文件.

所以我创建了一个列表:

lst <<- list(cats, dogs,fish, ....)

然后遍历列表:

for(i in seq_along(lst)) {
    write.table(lst[[i]], paste(names(lst)[i], ".txt", sep = ""), 
               col.names = FALSE, row.names = FALSE,  sep = "\t")
}

但上面迭代的输出是一个调用的文本文件.txt,它包含列表中最后一个变量的内容.

任何想法为什么上述循环不能按预期工作？

Answer 1

请注意以下事项:

> cats <- "some long text with info"
> dogs <- "some long text with info"
> fish <- "some long text with info"
> lst <- list(cats, dogs,fish)  # not <<-
> names(lst)
NULL

当您创建列表时,您没有给它任何名称,因此您的循环没有任何可用的东西.修复:

> names(lst) <- c("cats", "dogs", "fish")