首页 > 解决方案 > 在每次更改值时添加数据框/行

问题描述

我正在使用具有以下结构的数据框列表(名为 b2)。

b2<- split(resumen,resumen$Clave.Cliente)
b2$'902'

数据框

semana2 是具有以下结构的单个 data.frame(不在列表中):

semana2<- as.data.frame(seq(from = as.Date("2018-02-05"), to = as.Date("2020-06-25"), by = 7))
names(semana2)<- 'semana'
semana2$total.de.unidades<- NA
semana2$total.de.unidades<- as.numeric(semana2$total.de.unidades)

周报2

我需要做的是,对于 Clave.Articulo 列中的每次值更改 bind_rows或在下面添加 data.frame semana2。

结果将是这样的。

b3<- lapply(b2, function(x) bind_rows(x,semana2))
b3$'000053'

输出

如您所见,我绑定了数据框底部的行,而不是在“Clave.Articulo”的每次更改中绑定它。

如果你能做到,你会帮我很多。我建议使用 dplyr::bind_rows 来完成这项任务,但我让你考虑一下。结果将是一个更大的数据框。

非常感谢您的帮助。

标签: rlistdataframedplyrlapply

解决方案


推荐阅读