R list-展开矢量元素以列出具有相同名称的元素

Question

我想知道是否有较短的方法来执行以下转换：

params <- list(A = 1, B = c(1, 2))  #   ->   list(A = 1, B = 1, B = 2)
purrr::lmap(params,
  ~ purrr::set_names(as.list(.x[[1]]),
                     rep(names(.x), length(.x[[1]])))
)

Answer 1

[这里是一个选项，其中我们unlist'params'list，然后使用as.list将每个元素转换为列表元素，同时使用names关联list设置rep的names ]基于原始lengths的list的“参数”