如何添加現有列表的後綴（或前綴）元素？

Question

比方說，我有一個名爲myList的現有列表。

myList <- list(list1=c("item1", "item2"), list2=c("item3", "item4")) 

myList因此包含：

$list1 
[1] "item1" "item2" 

$list2 
[1] "item3" "item4" 

我想追加.t0到list1每個元素和內myListlist2所以我結束了：

$list1 
[1] "item1.t0" "item2.t0" 

$list2 
[1] "item3.t0" "item4.t0" 

我做不想回到list(list1=c("item1", "item2"), list2=c("item3", "item4")) ste並在那裏添加.t0。我想操縱myList添加.t0。

Answer 1

使用lapply和paste0

> lapply(myList, paste0, ".t0") 
$list1 
[1] "item1.t0" "item2.t0" 

$list2 
[1] "item3.t0" "item4.t0" 

Answer 2

從tidyverse與purrr的實現：

前綴：

library(purrr) 
nms <- purrr::map_chr(myList, ~ paste0("t0.", .)) 

後綴：

library(purrr) 
nms <- purrr::map_chr(myList, paste0, ".t0")