使用apply函数迭代两个值时，可以使用expand.grid函数创建一个包含所有组合的数据框，然后使用apply函数在每个组合上执行相应的操作。

下面是一个示例代码：

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

# 使用expand.grid函数创建包含所有组合的数据框
combinations <- expand.grid(vector1, vector2)

# 使用apply函数在每个组合上执行操作
result <- apply(combinations, 1, function(x) {
  # 在这里放入你想要执行的操作，x[1]表示第一个值，x[2]表示第二个值
  # 这里只是简单地将两个值相加作为示例
  sum <- x[1] + x[2]
  return(sum)
})

# 打印结果
print(result)

在上面的示例中，首先创建了两个向量vector1和vector2。然后使用expand.grid函数创建了一个包含所有组合的数据框combinations。接下来，通过apply函数在每个组合上执行操作，这里使用匿名函数将两个值相加，并将结果保存在result中。最后，打印result即可查看结果。

注意，这种方法可以避免使用嵌套循环，但在处理大型数据集时可能会导致性能问题。在这种情况下，可能需要考虑使用更高效的方法来处理数据。