如何重写循环功能，使其能够识别link_x？

Question

我正在研究如何获取循环以简单地引用link_1，link_2，link_3和link_4并将其放置在字符向量中。但是，循环无法识别“ loop_x”，这意味着它取决于循环而使用对象link_1，link_2，link_3或link_4。我希望解决此问题将有助于我在循环中应用此功能。

    link_1 <- "https://www.presidency.ucsb.edu/advanced-search?field-keywords=%22space+exploration%22&field-keywords2=&field-keywords3=&from%5Bdate%5D=&to%5Bdate%5D=&person2=&items_per_page=100"
    link_2 <- next_page(link_1)
    link_3 <- next_page(link_2)
    link_4 <- next_page(link_3)

output <- str_c(c("link1", "link2", "link3","link4")
for (x in 1:4) {
  output[x] = link_x
}
output

有人知道我们应该如何重写“ loop_x”吗？我们应该改用地图吗？