Как добиться стационарности для этого типа временных рядов с помощью R?

Question

Мне кажется, что это экспоненциальный тренд, но я не совсем уверен, как к этому подойти.

Answer 1

Использование пакета прогнозов:

library(forecast)
no_diffs_to_stationary = ndiffs(df$px)
df$stationary_series <- c(rep(NA, no_diffs_to_stationary),
                          diff(df$px, no_diffs_to_stationary))
mean(df$stationary_series, na.rm = TRUE)
sd(df$stationary_series, na.rm = TRUE)

Данные:

x <- seq(0, 20, length.out=1000)
df <- data.frame(x = x, px = dexp(x, rate=0.65))