Добавление векторных значений в подсписки

Question

Предположим, у нас есть список из трех подсписков: list1 <- [[1,2],[4,5],[7,8]] и вектор: vector1 <- c(3,6,9)

Есть ли способ в R, без использования циклов, добавить значения вектора в список, чтобы мы могли получить результат list2 = [[1,2,3],[4,5,6],[7,8,9]] ? Спасибо за все комментарии

Answer 1

Использование Map

Map(c, list1, vector1)

#[[1]]
#[1] 1 2 3

#[[2]]
#[1] 4 5 6

#[[3]]
#[1] 7 8 9

Или lapply

lapply(seq_along(list1), function(x) c(list1[[x]], vector1[[x]]))

---

Эквивалентные purrr варианты могут быть

purrr::map2(list1, vector1, c)
purrr::map(seq_along(list1), ~c(list1[[.]], vector1[[.]]))

данные

list1 <- list(c(1,2),c(4,5),c(7,8))
vector1 <- c(3,6,9)