如何添加现有列表的后缀（或前缀）元素？

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")