2012-04-01 71 views

回答

2

從#[email protected]

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

您可能還會發現'embed'函數在更一般的情況下會有幫助。 – joran 2012-04-02 01:59:18

2

快速和骯髒的「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]) 
} 
相關問題