data <- read.csv("D:/Users/Usuario/Desktop/ANGELICA/ESPECIALIZACION/COMUNICACION/covid19/WHO-COVID-19-global-data.csv")

##Casos confirmados Global Esta grafica representa los datos de la Organizacion Mundial de la Salud

Muertes Global

Nuevos casos reportados por Region

Nuevos casos reportados por Region

Nuevos casos Americas

Nuevos casos Europa

Nuevos casos Europa por pais

Nuevos casos Europa por pais

Esta grafica se hizo con objetivos didacticos y de aprendizaje, ya que visualmente no muestra los datos de manera legible o que aporte al analisis

##Covid Brazil

Covid Ecuador Nuevos casos

Covid Ecuador Casos Acumulados

## Covid Ecuador Nuevas muertes

Covid Ecuador Muertes Acumuladas

## `geom_smooth()` using method = 'loess' and formula 'y ~ x'

Conclusiones En este reporte podemos ver la cantidad de contagios de COVID 19 en el mundo, en America y los casos puntuales de Brazil y Ecuador