library(foreign)
library(ggfortify)
library(forecast)
library(gridExtra)
library(seasonal)
library(lattice)
library(zoo)
library(urca)
library(dynlm)
library(highcharter)
## Highcharts (www.highcharts.com) is a Highsoft software product which is
## not free for commercial and Governmental use
library(readxl)
Historico <- read_excel("Historico (3).xlsx",   sheet = "Hoja3")
library(imputeTS)
## 
## Attaching package: 'imputeTS'
## The following object is masked from 'package:zoo':
## 
##     na.locf

serie 1

I11=ts(Historico[,2], start = c(2008,1), frequency = 2)
I11=na_ma(I11, 3)
mod1=HoltWinters(I11, seasonal = "additive")
plot(mod1)

pred=predict(mod1, 2, prediction.interval = TRUE)
pred
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 18.306171 64.08279 -27.47045
## 2023.5  5.495662 54.01502 -43.02369
plot(mod1, pred)

serie 2

I11=ts(Historico[,3], start = c(2008,1), frequency = 2)
I11=na_ma(I11, 3)
mod1=HoltWinters(I11, seasonal = "additive")
plot(mod1)

pred=predict(mod1, 2, prediction.interval = TRUE)
pred
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr        lwr
## 2023.0 16.62792 123.6298  -90.37399
## 2023.5 12.21174 153.1002 -128.67670
plot(mod1, pred)

library(Metrics)
## 
## Attaching package: 'Metrics'
## The following object is masked from 'package:forecast':
## 
##     accuracy
library(MLmetrics)
## 
## Attaching package: 'MLmetrics'
## The following object is masked from 'package:base':
## 
##     Recall

serie 3

dim(Historico)
## [1] 30 25
for (j in 2:25) {
  I11=ts(Historico[,j], start = c(2008,1), frequency = 2)
  I11=na_ma(I11, 3)
  mod1=HoltWinters(I11, seasonal = "additive")
  print(paste0("Espacio Académico: ", j))
  pred=predict(mod1, 2, prediction.interval = TRUE)
  print(pred)
  plot(mod1, pred , main= paste("Espacio Académico: ",j ,sep=" "))
  print(paste("RMSE:",j,rmse(mod1$x[3:30], mod1$fitted[,1])))
  print(paste("MAPE:",j,MAPE(mod1$x[3:30], mod1$fitted[,1])))
  print(paste("MAE:",j,MAE(mod1$x[3:30], mod1$fitted[,1])))
  print("------------------------------------")
  print("------------------------------------")
  print("------------------------------------")
  print("------------------------------------")
}
## [1] "Espacio Académico: 2"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 18.306171 64.08279 -27.47045
## 2023.5  5.495662 54.01502 -43.02369

## [1] "RMSE: 2 22.9698214762657"
## [1] "MAPE: 2 0.74070813100936"
## [1] "MAE: 2 19.3737139848094"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 3"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr        lwr
## 2023.0 16.62792 123.6298  -90.37399
## 2023.5 12.21174 153.1002 -128.67670

## [1] "RMSE: 3 54.6973756823981"
## [1] "MAPE: 3 3.52001704335656"
## [1] "MAE: 3 45.227028381616"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 4"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##        fit      upr       lwr
## 2023.0   9 50.80087 -32.80087
## 2023.5   9 68.11536 -50.11536

## [1] "RMSE: 4 20.9484728884691"
## [1] "MAPE: 4 0.435995230532129"
## [1] "MAE: 4 13.5544217687075"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 5"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr        lwr
## 2023.0 30.22196 138.2961  -77.85216
## 2023.5 28.37445 167.7252 -110.97626

## [1] "RMSE: 5 55.0755637677662"
## [1] "MAPE: 5 0.362416876079528"
## [1] "MAE: 5 29.3685313462727"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 6"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##            fit      upr       lwr
## 2023.0 6.37704 63.71884 -50.96476
## 2023.5 5.25408 90.74688 -80.23872

## [1] "RMSE: 6 29.4825509306635"
## [1] "MAPE: 6 12.0809632137542"
## [1] "MAE: 6 20.8411420021792"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 7"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 53.89951 127.7080 -19.90898
## 2023.5 60.66495 138.6002 -17.27032

## [1] "RMSE: 7 36.9805367916554"
## [1] "MAPE: 7 0.556596253011953"
## [1] "MAE: 7 30.4602477953624"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 8"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 12.180619 62.74259 -38.38135
## 2023.5  3.838892 80.32781 -72.65002

## [1] "RMSE: 8 25.3749367556727"
## [1] "MAPE: 8 0.621211020081806"
## [1] "MAE: 8 19.9238038956405"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 9"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##               fit      upr       lwr
## 2023.0 -1.8668640 44.68229 -48.41602
## 2023.5  0.8338896 52.13684 -50.46906

## [1] "RMSE: 9 23.5113708920588"
## [1] "MAPE: 9 1.53413267490915"
## [1] "MAE: 9 17.588082904434"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 10"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 -6.515302 27.34887 -40.37947
## 2023.5 -4.970605 40.16768 -50.10889

## [1] "RMSE: 10 17.0150727487278"
## [1] "MAPE: 10 1.07619598633126"
## [1] "MAE: 10 13.5727078748111"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 11"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 28.66313 80.64379 -23.31754
## 2023.5 23.71003 86.80804 -39.38798

## [1] "RMSE: 11 26.0652222960378"
## [1] "MAPE: 11 0.356500489304425"
## [1] "MAE: 11 18.0265797555239"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 12"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 13.12647 51.87357 -25.62062
## 2023.5 13.09365 58.80321 -32.61591

## [1] "RMSE: 12 19.4255859487393"
## [1] "MAPE: 12 0.496070478699094"
## [1] "MAE: 12 15.3972867573153"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 13"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 10.88940 62.08869 -40.30990
## 2023.5 -3.63081 54.68082 -61.94244

## [1] "RMSE: 13 26.1628629533199"
## [1] "MAPE: 13 0.309658921903693"
## [1] "MAE: 13 19.4191100688102"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 14"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##        fit      upr       lwr
## 2023.0  12 48.52516 -24.52516
## 2023.5  15 66.65438 -36.65438

## [1] "RMSE: 14 18.3850191343775"
## [1] "MAPE: 14 0.389621775632439"
## [1] "MAE: 14 13.875"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 15"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##               fit      upr       lwr
## 2023.0 -0.3970145 40.67169 -41.46572
## 2023.5 -7.6052280 36.95514 -52.16560

## [1] "RMSE: 15 20.8434888596738"
## [1] "MAPE: 15 0.926843008295679"
## [1] "MAE: 15 16.7333729877568"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 16"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 28.63661 84.07127 -26.79805
## 2023.5 17.38923 75.67364 -40.89518

## [1] "RMSE: 16 28.182766450298"
## [1] "MAPE: 16 0.177513271689133"
## [1] "MAE: 16 21.365392977024"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 17"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 -2.581412 23.82397 -28.98679
## 2023.5 -3.028587 27.65351 -33.71069

## [1] "RMSE: 17 13.5700806193197"
## [1] "MAPE: 17 0.445790006060366"
## [1] "MAE: 17 8.7658983141106"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 18"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 -2.603218 32.49122 -37.69766
## 2023.5 -6.166096 42.65696 -54.98915

## [1] "RMSE: 18 17.8596200155138"
## [1] "MAPE: 18 0.57849854540764"
## [1] "MAE: 18 12.7082214001969"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 19"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 14.451680 52.57532 -23.67196
## 2023.5  5.508909 56.04688 -45.02906

## [1] "RMSE: 19 19.2724959714272"
## [1] "MAPE: 19 0.388676813996154"
## [1] "MAE: 19 14.8808283303262"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 20"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 3.9403302 56.87038 -48.98972
## 2023.5 0.4403302 73.11381 -72.23315

## [1] "RMSE: 20 26.5482369609799"
## [1] "MAPE: 20 0.461282484940038"
## [1] "MAE: 20 21.0448024638744"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 21"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 18.85268 36.33774  1.367617
## 2023.5 21.31126 44.94053 -2.318020

## [1] "RMSE: 21 8.77536607795764"
## [1] "MAPE: 21 0.396318098413459"
## [1] "MAE: 21 5.71078561403085"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 22"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 -6.445774 26.74227 -39.63382
## 2023.5 -1.891548 45.19062 -48.97371

## [1] "RMSE: 22 16.925675483447"
## [1] "MAPE: 22 0.436782933960767"
## [1] "MAE: 22 11.7669429907152"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 23"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0  1.432645 190.8889 -188.0236
## 2023.5 -8.976859 226.7876 -244.7413

## [1] "RMSE: 23 97.1441807770244"
## [1] "MAPE: 23 1.60772850251341"
## [1] "MAE: 23 59.6961641477577"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 24"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr        lwr
## 2023.0 12.77605 33.89206  -8.339965
## 2023.5 12.61336 38.04144 -12.814715

## [1] "RMSE: 24 10.7791682224783"
## [1] "MAPE: 24 0.676460569807377"
## [1] "MAE: 24 7.48871723659726"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 25"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 10.63037 61.43790 -40.17716
## 2023.5 25.26605 90.12365 -39.59156

## [1] "RMSE: 25 25.516575950746"
## [1] "MAPE: 25 0.996980873174251"
## [1] "MAE: 25 19.6180976687827"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
for (j in 2:25) {
  I11=ts(Historico[,j], start = c(2008,1), frequency = 2)
  I11=na_ma(I11, 3)
  mod1=HoltWinters(I11, seasonal = "additive")
  print(paste0("Espacio Académico: ", j))
  pred=predict(mod1, 2, prediction.interval = TRUE)
  print(pred)
  plot(mod1, pred , main= paste("Espacio Académico: ",j ,sep=" "))
  print(cbind(Real=mod1$x[3:30],Ajustado_modelo= mod1$fitted[,1]))
  print("------------------------------------")
  print("------------------------------------")
  print("------------------------------------")
}
## [1] "Espacio Académico: 2"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 18.306171 64.08279 -27.47045
## 2023.5  5.495662 54.01502 -43.02369

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##             Real Ajustado_modelo
## 2009.0  97.00000       86.625000
## 2009.5  87.00000       82.769879
## 2010.0  96.00000      112.812015
## 2010.5  63.00000      101.596194
## 2011.0 122.00000      114.705836
## 2011.5  75.00000      103.648749
## 2012.0 137.00000      115.558401
## 2012.5 102.00000      106.268751
## 2013.0 112.00000      125.662504
## 2013.5  77.00000      106.615879
## 2014.0 106.00000      114.415520
## 2014.5 129.00000       90.721362
## 2015.0 141.00000      116.669342
## 2015.5  66.00000      108.958218
## 2016.0  88.00000      115.756694
## 2016.5  56.00000       86.952821
## 2017.0  56.00000       87.363170
## 2017.5  60.57143       48.487069
## 2018.0  56.00000       54.670845
## 2018.5  56.00000       24.388578
## 2019.0  43.50000       39.444229
## 2019.5  22.25000       15.060270
## 2020.0  11.00000       26.885596
## 2020.5  11.00000       -2.817443
## 2021.0  13.28571       10.032087
## 2021.5   6.00000      -13.257262
## 2022.0  21.00000        4.063661
## 2022.5  27.00000      -11.042593
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 3"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr        lwr
## 2023.0 16.62792 123.6298  -90.37399
## 2023.5 12.21174 153.1002 -128.67670

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0  294     281.3750000
## 2009.5  331     322.6889215
## 2010.0  277     331.1784049
## 2010.5  328     315.9315375
## 2011.0  356     312.1482308
## 2011.5  303     390.7827502
## 2012.0  359     311.6890663
## 2012.5  318     364.4338624
## 2013.0  244     344.2309884
## 2013.5  177     252.3584893
## 2014.0  214     186.3556405
## 2014.5  273     196.2750727
## 2015.0  373     277.2273223
## 2015.5  227     362.5716484
## 2016.0  243     277.7746392
## 2016.5  189     203.2745415
## 2017.0  192     229.8350702
## 2017.5  118     153.1976563
## 2018.0  130     153.4983535
## 2018.5   46      84.4170353
## 2019.0   30      80.0339291
## 2019.5   42     -19.1306743
## 2020.0   30      53.1405083
## 2020.5   33      -0.4879552
## 2021.0    6      34.3773597
## 2021.5    9     -11.9378877
## 2022.0    7       0.4652448
## 2022.5   28      -6.8510773
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 4"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##        fit      upr       lwr
## 2023.0   9 50.80087 -32.80087
## 2023.5   9 68.11536 -50.11536

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##             Real Ajustado_modelo
## 2009.0  22.33333        22.33333
## 2009.5  22.33333        22.33333
## 2010.0  34.42857        22.33333
## 2010.5  20.00000        34.42857
## 2011.0  27.00000        20.00000
## 2011.5 107.00000        27.00000
## 2012.0 108.00000       107.00000
## 2012.5  96.00000       108.00000
## 2013.0  94.00000        96.00000
## 2013.5  90.00000        94.00000
## 2014.0  77.00000        90.00000
## 2014.5  61.00000        77.00000
## 2015.0  88.00000        61.00000
## 2015.5  80.00000        88.00000
## 2016.0  87.00000        80.00000
## 2016.5 108.00000        87.00000
## 2017.0  96.00000       108.00000
## 2017.5  94.00000        96.00000
## 2018.0  69.00000        94.00000
## 2018.5  51.00000        69.00000
## 2019.0   8.00000        51.00000
## 2019.5  22.00000         8.00000
## 2020.0   5.00000        22.00000
## 2020.5   9.00000         5.00000
## 2021.0  18.00000         9.00000
## 2021.5   9.00000        18.00000
## 2022.0  10.00000         9.00000
## 2022.5   9.00000        10.00000
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 5"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr        lwr
## 2023.0 30.22196 138.2961  -77.85216
## 2023.5 28.37445 167.7252 -110.97626

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0  144      127.625000
## 2009.5  210      191.453798
## 2010.0  278      199.404059
## 2010.5  317      317.110704
## 2011.0  333      323.573041
## 2011.5  133      384.954505
## 2012.0  187      188.066073
## 2012.5  223      196.990282
## 2013.0  223      226.184842
## 2013.5  221      237.917987
## 2014.0  167      231.614057
## 2014.5  210      190.396883
## 2015.0  183      202.558797
## 2015.5  152      201.435676
## 2016.0  123      153.991760
## 2016.5  111      134.946934
## 2017.0  108      102.850952
## 2017.5  112      109.051465
## 2018.0   77       99.746425
## 2018.5   63       83.754446
## 2019.0   51       51.190970
## 2019.5   39       49.942234
## 2020.0   65       25.333463
## 2020.5   23       54.620414
## 2021.0   16       20.094650
## 2021.5   25        8.247618
## 2022.0   28       12.383983
## 2022.5   41       19.501053
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 6"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##            fit      upr       lwr
## 2023.0 6.37704 63.71884 -50.96476
## 2023.5 5.25408 90.74688 -80.23872

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0  141     128.3750000
## 2009.5  162     160.8362311
## 2010.0  141     171.4594045
## 2010.5  126     157.7355785
## 2011.0  136     128.8766823
## 2011.5   96     150.1306148
## 2012.0   99      93.9014260
## 2012.5  115     107.9410595
## 2013.0  147     114.1881784
## 2013.5  181     160.1609843
## 2014.0  170     185.8665875
## 2014.5  208     183.6872665
## 2015.0  243     213.7605283
## 2015.5  158     262.3552364
## 2016.0  129     155.8102695
## 2016.5  120     134.4726683
## 2017.0  124     113.4408799
## 2017.5  133     129.0584580
## 2018.0  119     127.9756312
## 2018.5  110     123.5256496
## 2019.0   86     102.5940937
## 2019.5   49      87.3377735
## 2020.0   22      35.7801003
## 2020.5   21      17.8216134
## 2021.0    4       6.6580141
## 2021.5   41      -0.1233104
## 2022.0   29      30.7291842
## 2022.5   18      29.0461672
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 7"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 53.89951 127.7080 -19.90898
## 2023.5 60.66495 138.6002 -17.27032

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0  186      173.750000
## 2009.5  187      209.903272
## 2010.0  240      184.185538
## 2010.5  197      224.777849
## 2011.0  238      222.076847
## 2011.5  200      233.624673
## 2012.0  269      237.529896
## 2012.5  246      239.331899
## 2013.0  257      272.319340
## 2013.5  212      258.708094
## 2014.0  226      266.799863
## 2014.5  180      226.422400
## 2015.0  299      221.209404
## 2015.5  235      204.889578
## 2016.0  192      261.065632
## 2016.5  167      201.683622
## 2017.0  166      205.236259
## 2017.5  163      146.718139
## 2018.0  138      153.915167
## 2018.5  108      112.876639
## 2019.0   92      105.153916
## 2019.5   69       64.203929
## 2020.0  110       54.696736
## 2020.5   34       39.892970
## 2021.0   43       49.198634
## 2021.5   72        7.078163
## 2022.0   48       38.269154
## 2022.5   78       28.752110
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 8"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 12.180619 62.74259 -38.38135
## 2023.5  3.838892 80.32781 -72.65002

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   39       58.125000
## 2009.5   53       32.915892
## 2010.0   30       23.288790
## 2010.5   19       31.569804
## 2011.0   16      -10.155017
## 2011.5   86       16.881048
## 2012.0  129       74.970705
## 2012.5  147      160.401338
## 2013.0  132      152.310723
## 2013.5  151      156.154933
## 2014.0  145      148.790960
## 2014.5  138      166.910947
## 2015.0  141      130.611060
## 2015.5  138      154.602237
## 2016.0  120      131.857912
## 2016.5  144      126.422629
## 2017.0  125      136.249326
## 2017.5  119      135.807651
## 2018.0  125      105.199199
## 2018.5   75      132.836659
## 2019.0   70       60.036438
## 2019.5   57       59.753083
## 2020.0   63       45.011639
## 2020.5   30       54.258733
## 2021.0    7       20.776942
## 2021.5    3      -11.752314
## 2022.0   19       -8.858041
## 2022.5   14        8.967710
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 9"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##               fit      upr       lwr
## 2023.0 -1.8668640 44.68229 -48.41602
## 2023.5  0.8338896 52.13684 -50.46906

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   25      24.0000000
## 2009.5   56      35.4633330
## 2010.0   38      46.0781890
## 2010.5   27      55.4790500
## 2011.0   33      44.6234178
## 2011.5  128      48.7427615
## 2012.0   63      83.8131243
## 2012.5   84      90.4068220
## 2013.0   96      91.6037038
## 2013.5   64     107.1682941
## 2014.0   75      91.1322443
## 2014.5   63      93.3259316
## 2015.0   67      77.3374162
## 2015.5   49      77.5916070
## 2016.0   41      58.3590451
## 2016.5   49      51.4849009
## 2017.0   71      39.7745253
## 2017.5   34      53.4359342
## 2018.0   52      36.7324123
## 2018.5   35      44.1735320
## 2019.0   23      31.8100042
## 2019.5    2      28.7017805
## 2020.0   15       6.4267608
## 2020.5   14       7.8379364
## 2021.0    5      -1.0146878
## 2021.5   15       0.6777738
## 2022.0    9      -3.1819076
## 2022.5    9       3.3923604
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 10"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 -6.515302 27.34887 -40.37947
## 2023.5 -4.970605 40.16768 -50.10889

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0    5       6.2500000
## 2009.5    5       4.1483820
## 2010.0   15       3.4210319
## 2010.5   23      13.0772098
## 2011.0   62      24.6849562
## 2011.5   44      59.6473765
## 2012.0   58      61.9846552
## 2012.5   55      50.8028160
## 2013.0   77      70.6844650
## 2013.5   82      70.5867618
## 2014.0   85      98.8188214
## 2014.5  103      84.7028828
## 2015.0  129     112.5671301
## 2015.5  105     133.5011516
## 2016.0  106     124.5584851
## 2016.5   78     102.1007395
## 2017.0   95      92.8169485
## 2017.5   76      81.2974027
## 2018.0   86      91.8512156
## 2018.5   68      71.0056449
## 2019.0   47      81.8767494
## 2019.5   45      34.8924610
## 2020.0   17      44.2899920
## 2020.5   12      11.3750297
## 2021.0   17       0.9627922
## 2021.5   36       9.2243136
## 2022.0   10      27.9265367
## 2022.5    7      14.8742306
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 11"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 28.66313 80.64379 -23.31754
## 2023.5 23.71003 86.80804 -39.38798

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   20        22.50000
## 2009.5   22        14.77973
## 2010.0   28        24.72955
## 2010.5   36        21.05191
## 2011.0   68        36.29007
## 2011.5  137        52.26827
## 2012.0   81       115.64912
## 2012.5   84        86.35756
## 2013.0  120        88.92812
## 2013.5  129       105.09865
## 2014.0  112       125.98556
## 2014.5  126       111.09866
## 2015.0  143       125.51221
## 2015.5   68       132.49614
## 2016.0   79        92.29484
## 2016.5   79        77.49028
## 2017.0   66        83.08702
## 2017.5   60        65.78259
## 2018.0   71        66.22381
## 2018.5   44        64.04728
## 2019.0   41        54.75101
## 2019.5   39        39.64207
## 2020.0   32        43.74526
## 2020.5   42        30.11350
## 2021.0    8        42.75552
## 2021.5   16        13.46512
## 2022.0   17        19.32704
## 2022.5   30        12.62690
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 12"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 13.12647 51.87357 -25.62062
## 2023.5 13.09365 58.80321 -32.61591

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   70       71.625000
## 2009.5   76       81.108020
## 2010.0   88       61.300437
## 2010.5   72       86.748553
## 2011.0  116       71.442143
## 2011.5  113       99.916441
## 2012.0  135      120.216599
## 2012.5  126      130.625149
## 2013.0  121      144.122192
## 2013.5  124      127.626452
## 2014.0  134      133.508795
## 2014.5  111      132.685204
## 2015.0  141      127.804415
## 2015.5  134      126.732617
## 2016.0  128      147.048255
## 2016.5  118      127.240685
## 2017.0  107      129.355658
## 2017.5  122      105.864289
## 2018.0  123      116.359655
## 2018.5   71      119.262477
## 2019.0   70       90.376073
## 2019.5   53       57.581841
## 2020.0   59       53.084665
## 2020.5   40       37.011382
## 2021.0   13       39.922810
## 2021.5   32        3.844206
## 2022.0   20       12.094547
## 2022.5   29       11.024148
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 13"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 10.88940 62.08869 -40.30990
## 2023.5 -3.63081 54.68082 -61.94244

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0  150      144.500000
## 2009.5  138      141.498013
## 2010.0  105      153.916518
## 2010.5  145      121.370846
## 2011.0  197      145.476600
## 2011.5  106      166.184651
## 2012.0  164      149.048290
## 2012.5  127      149.309170
## 2013.0   96      150.143582
## 2013.5   73      112.305997
## 2014.0   74       99.354445
## 2014.5   65       71.683390
## 2015.0   59       72.690440
## 2015.5   91       49.482766
## 2016.0   80       75.558822
## 2016.5   86       63.880135
## 2017.0   60       82.100613
## 2017.5   49       57.524889
## 2018.0   52       59.042259
## 2018.5   38       40.863672
## 2019.0   44       44.546354
## 2019.5   40       29.322844
## 2020.0   35       40.184884
## 2020.5   38       23.032038
## 2021.0   13       36.557758
## 2021.5   15        9.968515
## 2022.0   18       17.569963
## 2022.5    8        2.960735
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 14"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##        fit      upr       lwr
## 2023.0  12 48.52516 -24.52516
## 2023.5  15 66.65438 -36.65438

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0    8             5.5
## 2009.5    9            11.0
## 2010.0   12            10.0
## 2010.5   16            15.0
## 2011.0   13            17.0
## 2011.5   60            16.0
## 2012.0   84            61.0
## 2012.5   79            87.0
## 2013.0  103            80.0
## 2013.5   82           106.0
## 2014.0   76            83.0
## 2014.5   85            79.0
## 2015.0  119            86.0
## 2015.5  119           122.0
## 2016.0  125           120.0
## 2016.5  116           128.0
## 2017.0   73           117.0
## 2017.5   59            76.0
## 2018.0   66            60.0
## 2018.5   59            69.0
## 2019.0   38            60.0
## 2019.5   41            41.0
## 2020.0   38            42.0
## 2020.5   20            41.0
## 2021.0    9            21.0
## 2021.5   36            12.0
## 2022.0   24            37.0
## 2022.5   11            27.0
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 15"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##               fit      upr       lwr
## 2023.0 -0.3970145 40.67169 -41.46572
## 2023.5 -7.6052280 36.95514 -52.16560

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   66      64.1250000
## 2009.5   70      75.4144370
## 2010.0   77      63.4885134
## 2010.5  100      78.6008696
## 2011.0   61      80.6720720
## 2011.5   81      85.4541857
## 2012.0  116      72.3018548
## 2012.5   97     103.5011358
## 2013.0  112      97.8615055
## 2013.5   71     114.1080478
## 2014.0   79      95.9135633
## 2014.5   71      90.5391377
## 2015.0   90      80.3404326
## 2015.5  120      82.9636474
## 2016.0  101      98.9800785
## 2016.5   82     105.0908542
## 2017.0  119      95.0873959
## 2017.5   69     106.0002472
## 2018.0   89      95.3284961
## 2018.5   72      85.8276544
## 2019.0   52      84.8027746
## 2019.5   54      61.7321607
## 2020.0   47      57.4904322
## 2020.5   34      43.3166683
## 2021.0   12      36.6553139
## 2021.5   16      15.0674470
## 2022.0   11       8.3429793
## 2022.5   16      -0.8469869
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 16"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 28.63661 84.07127 -26.79805
## 2023.5 17.38923 75.67364 -40.89518

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0  139       127.37500
## 2009.5  156       141.65013
## 2010.0  149       164.19770
## 2010.5  176       173.97993
## 2011.0  191       192.38583
## 2011.5  144       204.51370
## 2012.0  202       202.71524
## 2012.5  228       205.01018
## 2013.0  225       220.38702
## 2013.5  242       228.02901
## 2014.0  208       244.95895
## 2014.5  213       242.11828
## 2015.0  180       241.32275
## 2015.5  186       219.84110
## 2016.0  209       202.82687
## 2016.5  171       187.81212
## 2017.0  189       171.83544
## 2017.5  143       158.66261
## 2018.0  120       143.11644
## 2018.5  157       117.10655
## 2019.0  107       113.30518
## 2019.5   96        95.47871
## 2020.0  124        84.34531
## 2020.5   91        80.50480
## 2021.0   14        79.13376
## 2021.5   79        49.40693
## 2022.0   47        45.36605
## 2022.5   49        31.55072
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 17"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 -2.581412 23.82397 -28.98679
## 2023.5 -3.028587 27.65351 -33.71069

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##            Real Ajustado_modelo
## 2009.0 106.3333      106.333333
## 2009.5 106.3333      106.333333
## 2010.0 106.3333      106.333333
## 2010.5 106.3333      106.333333
## 2011.0 101.0000      106.333333
## 2011.5 107.0000      103.177368
## 2012.0 105.0000      104.972179
## 2012.5  69.0000      105.323381
## 2013.0  59.0000       83.364576
## 2013.5  64.0000       66.099762
## 2014.0  48.0000       62.257325
## 2014.5  81.0000       50.788886
## 2015.0  66.0000       64.817193
## 2015.5  75.0000       65.131541
## 2016.0  57.0000       67.226553
## 2016.5  67.0000       61.654003
## 2017.0  65.0000       60.177255
## 2017.5  42.0000       63.978102
## 2018.0  47.0000       46.755100
## 2018.5  54.0000       45.921843
## 2019.0  17.0000       46.505366
## 2019.5  32.0000       28.775243
## 2020.0  26.0000       23.902285
## 2020.5  22.0000       25.154867
## 2021.0   1.0000       16.690647
## 2021.5   6.0000        7.140760
## 2022.0  10.0000       -1.506221
## 2022.5   4.0000        4.937156
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 18"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 -2.603218 32.49122 -37.69766
## 2023.5 -6.166096 42.65696 -54.98915

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   31       40.750000
## 2009.5   19       14.320125
## 2010.0   37       17.543797
## 2010.5   35       20.306519
## 2011.0   73       35.660605
## 2011.5  120       57.043512
## 2012.0   92      123.581875
## 2012.5   74       85.491096
## 2013.0   80       73.739999
## 2013.5   85       71.750411
## 2014.0   78       85.141273
## 2014.5   85       71.754956
## 2015.0   69       83.752359
## 2015.5   58       65.008791
## 2016.0   69       55.011645
## 2016.5   61       63.613171
## 2017.0   49       59.966213
## 2017.5   60       43.624122
## 2018.0   47       56.963512
## 2018.5   40       44.138986
## 2019.0   29       35.768337
## 2019.5   21       25.808267
## 2020.0   13       16.021995
## 2020.5   21        9.265131
## 2021.0   14       15.232978
## 2021.5    7       11.873328
## 2022.0    9        1.228267
## 2022.5    2        5.967106
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 19"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 14.451680 52.57532 -23.67196
## 2023.5  5.508909 56.04688 -45.02906

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   22       21.625000
## 2009.5   27       19.451337
## 2010.0   40       33.054033
## 2010.5   42       37.308722
## 2011.0   69       49.723776
## 2011.5   61       65.751533
## 2012.0   54       72.097014
## 2012.5   78       56.903015
## 2013.0   82       83.695121
## 2013.5  101       83.043423
## 2014.0   92      108.841357
## 2014.5   57       96.466198
## 2015.0  118       72.392922
## 2015.5  129      109.316362
## 2016.0  133      137.267501
## 2016.5  112      136.639550
## 2017.0   89      127.400749
## 2017.5   85       94.478418
## 2018.0   81       92.783920
## 2018.5   68       78.733685
## 2019.0   59       74.041373
## 2019.5   39       55.138465
## 2020.0   47       43.432888
## 2020.5   40       37.929480
## 2021.0    8       40.943358
## 2021.5   25        4.172581
## 2022.0   23       20.742626
## 2022.5   14       13.518883
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 20"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 3.9403302 56.87038 -48.98972
## 2023.5 0.4403302 73.11381 -72.23315

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   16       20.125000
## 2009.5   22       12.744088
## 2010.0   43       21.452302
## 2010.5   62       38.224964
## 2011.0   48       60.593166
## 2011.5   73       45.245172
## 2012.0  129       71.357671
## 2012.5  150      122.089145
## 2013.0  172      148.348438
## 2013.5  166      167.100472
## 2014.0  148      166.065118
## 2014.5  100      145.568963
## 2015.0  141      102.696440
## 2015.5  120      135.233473
## 2016.0  152      120.901406
## 2016.5  118      146.659811
## 2017.0   80      119.695880
## 2017.5   84       78.848914
## 2018.0   85       83.695196
## 2018.5   65       81.422791
## 2019.0   72       65.971782
## 2019.5   45       68.143294
## 2020.0   60       46.369452
## 2020.5   68       55.693443
## 2021.0    3       67.271787
## 2021.5   15        3.303138
## 2022.0    6       14.307865
## 2022.5    4        2.991599
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 21"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 18.85268 36.33774  1.367617
## 2023.5 21.31126 44.94053 -2.318020

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##             Real Ajustado_modelo
## 2009.0  6.666667        6.666667
## 2009.5  6.666667        6.666667
## 2010.0  6.666667        6.666667
## 2010.5  6.666667        6.666667
## 2011.0  6.666667        6.666667
## 2011.5  6.666667        6.666667
## 2012.0  6.666667        6.666667
## 2012.5  6.666667        6.666667
## 2013.0  7.000000        6.666667
## 2013.5  6.000000        6.969666
## 2014.0  8.000000        6.104923
## 2014.5  9.000000        7.762336
## 2015.0  7.000000        9.047412
## 2015.5 28.000000        7.088214
## 2016.0 19.000000       26.092619
## 2016.5 31.000000       20.696300
## 2017.0 36.000000       28.656543
## 2017.5 24.000000       37.253152
## 2018.0 21.000000       23.652138
## 2018.5 39.000000       22.132051
## 2019.0 38.000000       36.441551
## 2019.5 43.000000       39.725730
## 2020.0 23.000000       40.912470
## 2020.5 10.000000       26.583501
## 2021.0  4.000000        8.659320
## 2021.5 24.000000        6.443936
## 2022.0 26.000000       20.149258
## 2022.5 21.000000       28.599228
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 22"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0 -6.445774 26.74227 -39.63382
## 2023.5 -1.891548 45.19062 -48.97371

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   55       61.250000
## 2009.5   60       58.960865
## 2010.0   50       43.967371
## 2010.5   51       54.005146
## 2011.0   46       34.986328
## 2011.5   83       50.055292
## 2012.0   58       67.261581
## 2012.5   52       62.203588
## 2013.0   45       36.139697
## 2013.5   55       49.195177
## 2014.0   47       39.231525
## 2014.5   63       51.280168
## 2015.0   54       47.353554
## 2015.5  111       58.395172
## 2016.0  109       95.724566
## 2016.5  112      113.807692
## 2017.0  118       96.796373
## 2017.5   78      122.929143
## 2018.0   64       62.647812
## 2018.5   73       68.656279
## 2019.0   46       57.683477
## 2019.5   51       50.610319
## 2020.0   32       35.612759
## 2020.5   27       36.590138
## 2021.0    0       11.530087
## 2021.5   19        4.457890
## 2022.0   13        3.548948
## 2022.5    9       17.608127
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 23"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##              fit      upr       lwr
## 2023.0  1.432645 190.8889 -188.0236
## 2023.5 -8.976859 226.7876 -244.7413

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##             Real Ajustado_modelo
## 2009.0 447.00000     414.0000000
## 2009.5 385.00000     368.4422478
## 2010.0 457.00000     528.0804293
## 2010.5 363.00000     406.7195146
## 2011.0  94.00000     504.6170434
## 2011.5 186.00000     127.1990428
## 2012.0 297.00000     212.4705997
## 2012.5  88.00000     244.9659487
## 2013.0 125.00000     185.0132029
## 2013.5 142.00000      69.1912506
## 2014.0 150.00000     177.4959813
## 2014.5 208.00000     106.4179527
## 2015.0 315.00000     224.5649674
## 2015.5 259.00000     265.5462088
## 2016.0 227.00000     316.3848967
## 2016.5 195.00000     216.1011721
## 2017.0 168.00000     236.6639196
## 2017.5 154.00000     153.5497028
## 2018.0 135.00000     176.2744928
## 2018.5 121.00000     118.5694189
## 2019.0  58.00000     133.5046948
## 2019.5  21.00000      54.0080344
## 2020.0   6.00000      25.6445649
## 2020.5  17.71429     -14.3318261
## 2021.0  11.00000       3.5129057
## 2021.5  11.00000      -7.7698971
## 2022.0  11.00000      -0.4291837
## 2022.5  11.00000      -5.1453875
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 24"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr        lwr
## 2023.0 12.77605 33.89206  -8.339965
## 2023.5 12.61336 38.04144 -12.814715

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0 34.0       27.000000
## 2009.5 26.0       27.696356
## 2010.0 23.0       44.544932
## 2010.5 24.0       25.153383
## 2011.0 23.0       36.361932
## 2011.5 26.0       23.534847
## 2012.0  2.0       33.453884
## 2012.5 10.7       10.057760
## 2013.0  8.8        9.666455
## 2013.5  6.0        9.020423
## 2014.0 12.0        5.884113
## 2014.5 10.0        9.121736
## 2015.0 22.0       10.533356
## 2015.5 25.0       17.212191
## 2016.0 16.0       26.456694
## 2016.5 23.0       19.891201
## 2017.0 24.0       22.522104
## 2017.5 25.0       25.526271
## 2018.0 29.0       25.935553
## 2018.5 25.0       29.758633
## 2019.0 28.0       28.232352
## 2019.5  3.0       28.293652
## 2020.0  8.0       13.233927
## 2020.5 14.0        2.776141
## 2021.0  3.0       12.376529
## 2021.5 18.0        2.665420
## 2022.0 17.0       11.632314
## 2022.5 12.0       16.775394
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "Espacio Académico: 25"
## Time Series:
## Start = c(2023, 1) 
## End = c(2023, 2) 
## Frequency = 2 
##             fit      upr       lwr
## 2023.0 10.63037 61.43790 -40.17716
## 2023.5 25.26605 90.12365 -39.59156

## Time Series:
## Start = c(2009, 1) 
## End = c(2022, 2) 
## Frequency = 2 
##        Real Ajustado_modelo
## 2009.0   29       50.000000
## 2009.5   43       39.337822
## 2010.0   30      -19.011387
## 2010.5   22       29.477877
## 2011.0   17        2.457197
## 2011.5   58       16.070138
## 2012.0   97       40.411735
## 2012.5   80      121.426827
## 2013.0  132      124.943108
## 2013.5  118      131.022053
## 2014.0  109      164.043419
## 2014.5   94      109.950756
## 2015.0  110       95.788812
## 2015.5   77       85.092815
## 2016.0  113       89.292677
## 2016.5   55       79.080581
## 2017.0   85       90.303005
## 2017.5   36       36.617770
## 2018.0   29       62.778866
## 2018.5   23      -13.858090
## 2019.0    5       14.300344
## 2019.5   10      -11.676097
## 2020.0    7       -4.245709
## 2020.5   17        4.152799
## 2021.0    7       13.206371
## 2021.5   24       17.996401
## 2022.0    8       16.157841
## 2022.5   24       24.507615
## [1] "------------------------------------"
## [1] "------------------------------------"
## [1] "------------------------------------"