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

假设我有一个名为

myList

的现有列表

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

我想将

.t0

附加到

列表1

和

列表2

中

myList

的每个元素，因此我最终得到：

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

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

---

我不想回到

列表（list1=c（“item1”，“item2”），list2=c（“item3”，“item4”））

步骤并添加

.t0

。我想操作

myList

添加

.t0

使用

lappy

和

paste0

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

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

---

带有

purr

的实现来自：

前缀：

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

库（purrr）
nms如果您有
dataframe
格式的列，我想添加一个答案，因为其他答案不适用于这种情况

library(tidyverse)
myList <- data_frame(list1=c("item1", "item2"), list2=c("item3", "item4"))
myList <- myList %>% 
  mutate(
    list1 = paste0(list1, ".t0"),
    list2 = paste0(list2, ".t0")
  )

库（tidyverse）
迈利斯特
library(purrr)
nms <- purrr::map_chr(myList, paste0, ".t0")

library(tidyverse)
myList <- data_frame(list1=c("item1", "item2"), list2=c("item3", "item4"))
myList <- myList %>% 
  mutate(
    list1 = paste0(list1, ".t0"),
    list2 = paste0(list2, ".t0")
  )