每两个连续变量调用一个函数

Question

我有

c('a', 'b', 'c', 'd')

我想用

调用函数foo()

foo('a', 'b')
foo('b', 'c')
foo('c', 'd')

Answer 1

快速而肮脏'for'循环来完成这项工作：

foo <- function(a, b) {
  print(a)
  print(b)
}

a <- c('a', 'b', 'c', 'd')

for (i in 1:(length(a)-1)) {
  foo(a[i], a[i+1])
}

Answer 2

来自#R@irc.freenode.org：

x<-letters[1:10]; mapply(function(y,z) paste(y,z), head(x, -1), tail(x, -1))