如何用for循环对R语言向量进行子集提取并打印相邻双元素？

没问题，我来帮你调整代码实现这个需求～你的核心问题是当前循环直接遍历了向量里的每个元素，而我们需要通过索引位置来同时获取当前元素和它的下一个元素。

正确的代码实现 #

这里有两种简洁的写法，都能达到你想要的效果：

方法1：用cat输出更整洁的格式

s <- c(1, 2, 3, 4, 5)

# 循环范围是从第1个元素到倒数第2个元素的索引
for (i in 1:(length(s) - 1)) {
  # 取出相邻的两个元素
  current <- s[i]
  next_val <- s[i + 1]
  # 按照(数字,数字)的格式打印
  cat("(", current, ",", next_val, ")\n", sep = "")
}

运行后会输出：

(1,2)
(2,3)
(3,4)
(4,5)

方法2：用print输出字符串形式的结果

如果你更习惯用print函数，也可以这样写：

s <- c(1, 2, 3, 4, 5)

for (i in 1:(length(s) - 1)) {
  # 拼接成目标格式的字符串后打印
  print(paste0("(", s[i], ",", s[i + 1], ")"))
}

为什么你的原代码不行？ #

你原来的for (i in s)是让变量i依次取向量s里的每个元素值（1、2、3、4、5），这样只能单独访问每个元素，没办法同时拿到它的下一个元素。而我们改成遍历索引位置（从1到length(s)-1），就能通过s[i]和s[i+1]轻松获取相邻的一对元素了。

内容的提问来源于stack exchange，提问作者user3698773