El examen puede ser entregado hasta las 11:59 pm del lunes 02/11/2020. Consta sólo de dos preguntas que tiene que ser desarrollada en Rmarkdown.
Una vez terminado tiene que subir el archivo .Rmd al aula virtual.
Por último, recuerde que el certificado especificará el orden de mérito, esto es muy importante y considerado de valor por los reclutadores.
Usted es un experto escrapeando. Así que decide escrapear el tipo de cambio de la página del BCRP. Para lo cual corre el siguiente código.
library(rvest)
web<-"https://estadisticas.bcrp.gob.pe/estadisticas/series/mensuales/resultados/PN01205PM/html"
web<- read_html(web)
tipo_cambio<-web %>% html_nodes("table.series") %>% html_table()
tipo_cambio<-as.data.frame(tipo_cambio)
names(tipo_cambio)[2]<-"t_cambio"Convierte los datos en númerico y lo convierte en una serie de tiempo con la siguiente sintaxis.
tipo_cambio$t_cambio<-as.numeric(tipo_cambio$t_cambio)
tipo_cambio$t_cambio<-ts(tipo_cambio$t_cambio, start = c(1994,8), frequency = 12)Lo que tiene que realizar es lo siguiente:
a) Un gráfico del tipo de cambio. El resultado debe de ser muy similar al siguiente
** Recuerde que mientras más parecido sea obtendrá el puntaje maximo de 7.
b) Asimismo, tiene que realizar un gráfico del tipo de cambio pero sólo desde Enero del 2019 hasta Septiembre del 2020 y mostrar el periodo que duró la cuarentena. El resultado debe de ser muy similar al siguiente:
** Recuerde que mientras más parecido sea obtendrá el puntaje maximo de 7.
Calcular el error de predicción del siguiente modelo lineal.
X<-matrix(c(rep(1,10), seq(0.3, 0.9, length.out = 10),
3,5,3,2,7,3.2,4.1,1.5,8,4), nrow = 10, ncol = 3)
Y<-matrix(c(6,4,9,12,3,15,8,4,3,7))Recordar que para encontrar los betas del modelo lineal tiene que recurrir a la fórmula siguiente:
\[\hat{\beta}=(X'X)^{-1}(X'Y)\]
Una vez conseguido los betas que serán 3 (una constante y dos tendencias) calcular el error de predicción, es decir, la diferencia entre el Y real y el Y predicho. El Y real ya lo tiene, sólo le falta el Y predicho. Para lo cual lo puede calcular con la siguiente fórmula.
\[\hat{Y}=\hat{\beta}X\]
Una vez calculado los Y predichos, para calcular los errores sólo tiene que restar el Y real y el Y predicho de la siguiente manera:
\[\hat{e}=Y-\hat{Y}\]
Y de esa manera podrá encontrar los errores.
En su entregable tiene que estar escrito todo el código. Es decir, no debe de usar la opción echo=FALSE a la hora de introducir código R.
Ya saben cualquier duda, me lo pueden hacer llegar al whatsapp.