使用循环

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")
....

我读了this question的答案并尝试编写一个循环来自动编写文件。

所以我创建了一个列表：

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")