Try this:

n <- 3
apply(embed(a, n + 1)[,c(1, n + 1)], 1, diff)

On Wed, May 12, 2010 at 4:06 PM, Clark Johnston <clarkstat@clarktx.com>wrote:

>
> I was looking for  a function which would take the difference along a
> vector?
> >a<-c(1,12,23,44,15,28,7,8,9,10)
> if I set the number difference to 3 would return
> 43
> 2
> 5
> -37
> -7
> -19
> 3
>
> or do I need to write my own function for this.
> --
> View this message in context:
> http://r.789695.n4.nabble.com/difference-along-a-vector-tp2196594p2196594.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> 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.
>



-- 
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O

	[[alternative HTML version deleted]]

