Tenho um data.frame com 3 colunas: YEAR
, COHORT
e Income
. Gostaria de fazer uma interpolação linear entre os valores de 1960 e de 1980 para definir os valores de 1970.
- Para o
COHORT = 5
, gostaria de fazer a interpolação entre os valores de renda doCOHORT 6
em 1960 eCOHORT 4
em 1980. - Para o
COHORT = 6
, gostaria de fazer a interpolação entre os valores de renda doCOHORT 7
em 1960 eCOHORT 5
em 1980. - Para o
COHORT = 7
, gostaria de fazer a interpolação entre os valores de renda doCOHORT 8
em 1960 eCOHORT 6
em 1980.
Meu dput()
:
structure(list(YEAR = c(1960, 1960, 1960, 1970, 1970, 1970, 1980,
1980, 1980, 1991, 1991, 1991, 2000, 2000, 2000, 2010, 2010, 2010
), COHORT = c(6, 7, 8, 5, 6, 7, 4, 5, 6, 3, 4, 5, 2, 3, 4, 1,
2, 3), Income = c(915.724030772489, 1096.65213496088, 1091.86180401191,
10658.0375195084, 12086.2816151274, 11935.8566030943, 1982.21058735071,
2643.80498840172, 2678.68985776785, 1477.22485149727, 2110.03451057428,
2195.96801801857, 1571.29380242384, 2233.01644287855, 2598.10210278486,
1773.24017405619, 2224.76855916153, 2449.47650046232)), row.names = c(NA,
-18L), groups = structure(list(YEAR = c(1960, 1970, 1980, 1991,
2000, 2010), .rows = structure(list(1:3, 4:6, 7:9, 10:12, 13:15,
16:18), ptype = integer(0), class = c("vctrs_list_of", "vctrs_vctr",
"list"))), row.names = c(NA, -6L), class = c("tbl_df", "tbl",
"data.frame"), .drop = TRUE), class = c("grouped_df", "tbl_df",
"tbl", "data.frame"))
+------+--------+------------+
| YEAR | COHORT | Income |
+------+--------+------------+
| 1960 | 6 | 915.724 |
| 1960 | 7 | 1096.652 |
| 1960 | 8 | 1091.862 |
| 1970 | 5 | 10658.038 |
| 1970 | 6 | 12086.282 |
| 1970 | 7 | 11935.857 |
| 1980 | 4 | 1982.211 |
| 1980 | 5 | 2643.805 |
| 1980 | 6 | 2678.690 |
| 1991 | 3 | 1477.225 |
| 1991 | 4 | 2110.035 |
| 1991 | 5 | 2195.968 |
| 2000 | 2 | 1571.294 |
| 2000 | 3 | 2233.016 |
| 2000 | 4 | 2598.102 |
| 2010 | 1 | 1773.240 |
| 2010 | 2 | 2224.769 |
| 2010 | 3 | 2449.477 |
+------+--------+------------+
Alguém tem alguma ideia de como fazer isso pelo R
? Tentei usar a função approxfun()
, mas não deu certo.
COHORT 6
em 1960 tem renda de 915, para 1970 esse valor sobe para 12.086, e em 1980 retorna para 2.678.