Как использовать функцию роста в г с одним столбцом в формате даты? - PullRequest
0 голосов
/ 29 апреля 2020

Я использую набор данных для расчета роста доходов за 2000-2019 гг. И рассчитываю заработок за каждый месяц в течение этих лет. Это в формате ymd, например, 2000-01-01

Я пытаюсь вычислить темп роста между месяцами, но он не позволяет мне правильно использовать функцию отставания из-за даты в столбце year формат, как указано выше.

Код:

average_weekly_earnings <- average_weekly_earnings %>% 
  group_by(year) %>% 
  mutate(diff_earnings_average = year - lag(year),
         diff_aveearnings_growth = realawe - lag(realawe),
         rate_percent_average = (diff_aveearnings_growth/diff_earnings_average)/realawe*100)

Error in /.difftime(diff_aveearnings_growth,diff_earninigs_average: second argument of /cannot be a 'difftime'object Этот код появляется, когда я пытаюсь его запустить.

Кто-нибудь знает, как это исправить?

Это вывод dput:

structure(list(year = structure(c(946684800, 949363200, 951868800, 
954547200), class = c("POSIXct", "POSIXt"), tzone = "UTC"), realawe = c(421.168268440558, 
410.160453374782, 422.012733947076, 423.306583956499), diff_aveearnings_growth = c(NA, 
-11.0078150657755, 11.8522805722941, 1.29385000942239), rate_percent_average = c(NA, 
-2.68378264535347, 2.80851254450074, 0.305653173954731)), class = c("tbl_df", 
"tbl", "data.frame"), row.names = c(NA, -4L))
...