Вычитание из новых результатов

Question

Я уже некоторое время ищу решение этой проблемы, но, кажется, не могу его найти.

Например: у меня есть одно значение: x = 22000 У меня есть один столбец со значениями Dataframe$netto_weights например: 1000, 2000, 5000,1000..

Я ищу способ вычесть эти netto_weights и сохранить результаты от каждого вычета X.

Я пытался объединить функции sapply с lead или lag, но продолжаю получать разные результаты.

Вывод будет выглядеть примерно так: x = 22000

1.  21000 (22000-1000)
2.  19000 (21000-2000)
3.  14000 (19000-5000)
4.  13000 (14000-1000)

Answer 1

Вы можете сделать:

x <- 22000
vec <- c(1000, 2000, 5000, 1000)

x - cumsum(vec)

[1] 21000 19000 14000 13000