Factor de expansion para proyectar poblacion

Buenas noches,

Estoy trabajando con la encuesta nacional de hogares y necesito calcular el factor de expansi贸n para proyectar la poblaci贸n. Alguien tan amable de ayudarme?

Try fitting the log of the population versus time.

``````#Invent data
library(dplyr)

set.seed(154)
DF <- data.frame(Year=seq(1990,2020))
DF <- DF |> mutate(Poblacion=1000000*1.035^(Year-1990)+rnorm(31,0,50000))

# Fit log of poblacion
FIT <- lm(log(Poblacion)~Year,data=DF)
summary(FIT)
#>
#> Call:
#> lm(formula = log(Poblacion) ~ Year, data = DF)
#>
#> Residuals:
#>       Min        1Q    Median        3Q       Max
#> -0.099878 -0.020439  0.003451  0.026638  0.051775
#>
#> Coefficients:
#>               Estimate Std. Error t value Pr(>|t|)
#> (Intercept) -5.418e+01  1.435e+00  -37.75   <2e-16 ***
#> Year         3.417e-02  7.158e-04   47.73   <2e-16 ***
#> ---
#> Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
#>
#> Residual standard error: 0.03565 on 29 degrees of freedom
#> Multiple R-squared:  0.9874, Adjusted R-squared:  0.987
#> F-statistic:  2278 on 1 and 29 DF,  p-value: < 2.2e-16

#1.035 ~= 1.0342
``````

Created on 2022-05-31 by the reprex package (v2.0.1)

This topic was automatically closed 21 days after the last reply. New replies are no longer allowed.

If you have a query related to it or one of the replies, start a new topic and refer back with a link.