Hi, Try: x[-1]+x[-length(x)]
A.K. On Saturday, December 14, 2013 5:46 AM, 水静流深 <1248283...@qq.com> wrote: x<-c(1,4,9,20,3,7) i want to get a serie c(5,13,29,23,10). y <- c() for (i in 2:length(x)){ y[i-1] <- x[i-1]+x[i]} is there more simple way to get? [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.