RDocumentation: diff

if(!require('base')) {
    install.packages('base')
    library('base')
}

diff(1:10, 2)
diff(1:10, 2, 2)
x <- cumsum(cumsum(1:10))
diff(x, lag = 2)
diff(x, differences = 2)

diff(.leap.seconds)

y = c(1,2,3,4,5)
diff(y)