在R中，我们可以使用for循环来遍历两个向量。下面是一个示例代码：

# 创建两个向量
vector1 <- c(1, 2, 3, 4, 5)
vector2 <- c(6, 7, 8, 9, 10)

# 获取向量的长度
length1 <- length(vector1)
length2 <- length(vector2)

# 确保两个向量的长度相同
if(length1 != length2) {
  stop("两个向量的长度不相同")
}

# 使用for循环遍历两个向量
for(i in 1:length1) {
  # 获取当前索引的元素
  element1 <- vector1[i]
  element2 <- vector2[i]
  
  # 在循环中执行操作
  # ...
  
  # 打印元素
  cat("vector1:", element1, "vector2:", element2, "\n")
}

上述代码首先创建了两个向量vector1和vector2，然后获取了它们的长度。接下来，使用if语句检查两个向量的长度是否相同，如果不相同，则抛出一个错误。然后，使用for循环遍历两个向量，并在循环中执行所需的操作。在示例代码中，我们只是打印了每对元素。你可以根据自己的需求，在循环中执行其他操作。