load("~/data/appl-wb/20_staff/kjo/misc_data/RR_AVS_2024_fullagerange.RData")

x <- 
  filter(RR_AVS, gpr == "rvieillesse_simple") %>% 
  dplyr::summarize(alt = sum(12 * monatliche_rentensumme), .by = "jahr")


