как добавить новый столбец в каждый набор данных в списке

Question

Я посмотрел на некоторые похожие вопросы, но они не очень помогли.

У меня есть список с 4-мя датафреймами, и я хотел бы добавить столбец к каждому из 4-х фреймов данных.

ниже приведены несколько команд, которые я пробовал.все они просто приводят к списку из 4 векторов (только разнообразие).

abundance_tables<-lapply(abundance_tables,function(tab) tab$diversity<-diversity(tab) )
abundance_tables<-mapply(function(tab) tab$diversity<-diversity(tab),abundance_tables,SIMPLIFY = F )

любая помощь приветствуется.

спасибо

Answer 1

Вы не предоставляете пример данных, поэтому я генерирую образец list из 4 data.frame с.

lst <- lapply(1:4, function(x) data.frame(one = LETTERS[1:4], two = 1:4))

Мы добавляем третий столбец к каждому data.frame в list.

lapply(lst, function(x) { x$three = letters[11:14]; x })
#[[1]]
#  one two three
#1   A   1     k
#2   B   2     l
#3   C   3     m
#4   D   4     n
#
#[[2]]
#  one two three
#1   A   1     k
#2   B   2     l
#3   C   3     m
#4   D   4     n
#
#[[3]]
#  one two three
#1   A   1     k
#2   B   2     l
#3   C   3     m
#4   D   4     n
#
#[[4]]
#  one two three
#1   A   1     k
#2   B   2     l
#3   C   3     m
#4   D   4     n

Обратите внимание, что нам нужно вернуть x, чтобы получить data.frame с добавленным столбцом.