R 使用diff计算当前值和以前值之间的差异

如何使用diff函数计算当前值和以前值之间的差值，而不是下一个值和当前值之间的差值

这是@Andrie用函数包装的解决方案：

x = c(1,4,5,8)
diff( x )
[1] 3 1 3

newDiff <- function( a )
{
  x <- a[1]
  x <- c( x, diff( a ) )
  return( x )
} 

newDiff( x )
[1] 1 3 1 3

x=c（1,4,5,8）
差异（x）
[1] 3 1 3
newDiff你是说
c（x[1]，diff（x））
？是的，这很有效！看似简单，非常感谢！