R 从列表中提取并保存到csv

我正在努力做一些我知道应该简单的事情

我有一个数据帧列表，如下所示：

a <- rep(1, 10)
b <- rep(3.6, 10)
foo1 <- cbind(a, b)

d <- rep(2, 8)
b <- rep(4.9, 8)
foo2 <- cbind(d, b)

data <- list(foo1, foo2)

---

a您可以使用循环来迭代
数据的字段
：

for (i in 1:length(data)) {
    col <- data[[i]][,2]
    fname <- paste("foo", i, ".csv", sep="")
    write.table(col,fname)
}

for（1中的i：长度（数据））{
col
lappy（数据，函数（x）x[，2，drop=FALSE]）
您尝试的导致此类错误的代码是什么？这些不是dataframes.ack。很抱歉，假数据不是df的。真实的数据对象是dataframes！@akrun，可以提取列。但是如何将lappy的结果馈送到单个csv中？我尝试了for循环和lappy，但无法获取结果索引正确。谢谢！我也尝试过这种方法，除了在第二行代码中索引“数据”的方式外，其他方法都是正确的。我一直尝试在变体中使用[I]，而不引用“数据”。现在我有了两个干净的方法。