从R中的循环返回单独的txt文件

我想返回循环中每次迭代的结果，并将其写入单独的文本文件中，但由于某种原因，它似乎不起作用。我的代码是：

 for (i in length(traject)){        
      player <-subset(traject[[i]],subset=(dt==1),)
      test<-player  
      write.table(test, file=paste(i, "test.txt", sep=" "))
      head(test)
       }

它只返回最后一次迭代，在单独的文本文件中生成所有迭代的结果我做错了什么？

额外信息：该循环适用于每个单独的玩家（具有不同的 ID）通过 as.ltraj() 从 adehabitatLT 包获取数据。

（我知道这个论坛上有类似的问题，但没有人可以帮助我解决这个问题）

也许你应该添加1:length(traject)在你的for循环如下：

for (i in 1:length(traject)){   do something }

您的循环仅返回一次迭代（最后一次），因为您的索引只是length(traject)相反你应该使用1:length(traject)对于索引i要从第一个元素一直移动到最后一个元素，您还可以替换1:length(traject) by seq_len(length(traject))