如何将粘贴与 for 循环一起使用？

Question

我正在尝试在循环中使用stringi库中的函数stri_join ，但我遇到了困难。我想获取“A_1.png”，“A_2.png”，“A_3.png”，“A_4.png”，“A_5.png”，依此类推，直到“A_200.png”。

这是我的尝试：

 x <- c(1:200)
 x
 for (i in 1:length(x)){
   Names <-paste("A_", 1:length(i), ".png",sep = "")
   print(Names)
 }

我获得“A_1.png”200次。如果你能指出我所缺少的东西。

Answer 1

我们不需要paste矢量化的循环。所以要么使用sprintf

Names <- sprintf("A_%d.png", x)

或者paste

Names <- paste0("A_", x, ".png")

如果这是循环练习for，则初始化“Names”向量并将“Names”的每个元素分配给来自paste

Names <- character(length(x))
for(i in seq_along(x)){
  Names[i] <- paste0("A_", i, ".png") 
}