为列表中的每个data.frame元素分配唯一的ID

问题描述

我有很多(空间)data.frames的列表.我想为每个data.frame添加一列，其ID等于列表索引ID(即每个data.frame的新列中的每一行都具有相同的ID).

I have a list of many (spatial) data.frames. I want to add a column to each data.frame that has an ID equivalent to the list index ID (i.e., every row in each individual data.frame's new column will have the same ID).

我认为我必须与cbind一起使用一些apply函数，但是我不知道如何为列表中的每个元素(尤其是Spatial data.frames元素)设置其格式.请帮忙！

I think I have to use some apply function along with cbind, but I do not know how to format it for each element in a list (especially of Spatial data.frames elements). Please help!

以下是一些可使用的示例代码:

Here is some example code to work with:

d1 <- data.frame(y1 = c(1, 2, 3), y2 = c(4, 5, 6))
d2 <- data.frame(y1 = c(3, 2, 1), y2 = c(6, 5, 4))
my.list <- list(d1, d2)

我想结束以下内容:

[[1]]
  y1 y2 unique.id
1  1  4  1
2  2  5  1
3  3  6  1

[[2]]
  y1 y2 unique.id
1  3  6  2
2  2  5  2
3  1  4  2

推荐答案

尝试:

newlist <- Map(cbind,my.list, unique.id = (1:length(my.list)))

这篇关于为列表中的每个data.frame元素分配唯一的ID的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！