Преобразовать совокупную стоимость в отдельные значения

Question

У меня есть совокупное значение

x <- cumsum(1:10)
1  3  6 10 15 21 28 36 45 55

Я хочу сгенерировать отдельные значения

x - lag(x, default = first(x))
0  2  3  4  5  6  7  8  9 10

Как первое значение x может быть 1. Оно отображается как 0.

Answer 1

Вы можете принять разницу.Первое значение в x не изменится, поэтому мы можем начать с x[1].

c(x[1], diff(x))
# [1]  1  2  3  4  5  6  7  8  9 10