C Appendix B

## [1] "2024-11-07"

---

Ejercicios para las funciones de transformaciones 2

Seleccione los siguientes datos sobre COVID en PR

LEEN bien lo que estoy pidiendo. El nombre de las columnas pueden engañar!!!

library(tidyverse)
library(data.table)
url_COVID_PR=fread("https://raw.githubusercontent.com/rafalab/pr-covid/master/dashboard/data/DatosMortalidad.csv")

library(gt)
Covid=url_COVID_PR
gt(tail(Covid, n=2))

Fecha	Muertes	IncrementoMuertes	CasosPCR_Salud	IncCasosPCR_Salud	CasosSaludNuevo	IncCasosSaludNuevo	HospitCOV19	CamasICU	CamasICU_disp	Ventiladores	MuertesSalud	IncMueSalud	VacDoses	VacAdm	N1MoreDoses	N2Doses
10/18/21	3209	2	151033	6	151089	11	78	28	189	17	3212	2	4972170	4848929	2578407	2306058
10/19/21	3213	4	151089	56	NA	NA	82	22	193	16	3213	1	NA	NA	NA	NA

1. Calcular el promedio de Muertes por dia de nuevos muertos desde el comienzo hasta el ultimo dia del archivo

2. ¿Cual es la máximo de nuevos casos en un día

3. ¿Calcular la cantidad cumulativa de numero de camas CamasICU

• Enseñe solamente las ultimas 4 filas

4. Haz una grafica de la varianza y como cambia atravez del tiempo.

• usa puntos para cada fecha
• añade una regresión LOESS
• cambia los nombres de los ejes para algo más claro
• los colores de los puntos
• cambia el color de la linea

---