R изменить список таблиц на основе вектора даты

Question

list(tibble(x = 1,y =2),tibble(x = 3 , y= 4),tibble(x = 5,y = 6))

dates = seq(as.Date("2020-02-04"),as.Date("2020-02-06"),1)

У меня есть список таблиц, и я хотел бы добавить столбец, в котором каждая таблица принимает 1 значение в последовательности дат, в результате чего таблица1 содержит столбец даты, заполненный 2020-02-04, таблица2 - 2020-02 -05 и табл3 с 2020-02-6.

Answer 1

Вы можете использовать функцию map2 из пакета purrr, это работает?

library(tidyverse)

old_list <- list(tibble(x = 1,y =2),tibble(x = 3 , y= 4),tibble(x = 5,y = 6))

dates <- seq(as.Date("2020-02-04"),as.Date("2020-02-06"),1)

new_list <- map2(old_list, dates, function(x, y){
  x[["date"]] <- y
  x
})

new_list

[[1]]
# A tibble: 1 x 3
      x     y date      
  <dbl> <dbl> <date>    
1     1     2 2020-02-04

[[2]]
# A tibble: 1 x 3
      x     y date      
  <dbl> <dbl> <date>    
1     3     4 2020-02-05

[[3]]
# A tibble: 1 x 3
      x     y date      
  <dbl> <dbl> <date>    
1     5     6 2020-02-06