相关疑难解决方法(0)

我有这样的样本数据

df <- data.frame(name = rep(letters[1:7], each = 24), salary = runif(24*7, 100, 200))

我想把每个名字和他们的工资分开

lst <- tapply(df$salary, df$name, matrix, nrow = 4, byrow = TRUE)

现在我想将所有这7个矩阵写入7个不同的文本文件,它一次只能用于单个矩阵.我试图放入一个for循环,但是没有用

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

任何人都可以建议for循环中的修改吗？