对R中的面板数据进行线性外推

到目前为止，我有一个面板数据集，其中包含184个国家，从1975年到2020年，每五年有40个变量。对于许多变量，原始来源提供了自20世纪90年代以来的值，因此我想在前几年外推该值，并在panel数据集中创建一个新变量作为外推结果。我应该如何通过线性推断完成这样的任务

到目前为止我已经试过了

    df_longuse %>% 
    group_by(Country) %>%
    mutate(avgschoolV2=approxExtrap(x=year, y=avgschool, xout=year)$y)

但代码给出了阿富汗（第一个国家）的重复结果，而不是每个国家的结果，新变量不能变异成面板数据

我也试过了

    na_spline <- function(x) if (all(is.na(x))) NA else na.spline(x, na.rm = FALSE)

na_样条曲线
    na_approx <- function(x) if (all(is.na(x))) NA else na.approx(x, na.rm = FALSE,rule=2),