См. Комментарий выше, чтобы понять, как предоставить воспроизводимый пример, включающий образцы данных.
Поскольку вы не предоставляете пример данных, давайте создадим некоторые минимальные макетные данные, аналогичные показанным на скриншоте.
lst <- list(
list("one", "12345", "2019-01-01"),
list("two", "67890", "2019-01-02"))
Чтобы сотворить третий элемент каждого list
элемента as.Date
, мы можем сделать
lst <- map(lst, ~{.x[[3]] <- as.Date(.x[[3]]); .x})
Мы можем подтвердить, что третий элемент каждого элемента list
является объектом типа Date
str(lst)
#List of 2
# $ :List of 3
# ..$ : chr "one"
# ..$ : chr "12345"
# ..$ : Date[1:1], format: "2019-01-01"
# $ :List of 3
# ..$ : chr "two"
# ..$ : chr "67890"
# ..$ : Date[1:1], format: "2019-01-02"
Обновление
Более purrr
/ tidyverse
-канонический подход заключается в использовании modify_at
(спасибо @ H1)
lst <- map(lst, ~modify_at(.x, 3, as.Date))
Результат тот же, что и раньше.