library(tidyverse)
library(gt)

Usando los datos de COVID-19

library(data.table)
mydat<- read.csv('https://raw.githubusercontent.com/owid/covid-19-data/master/public/data/owid-covid-data.csv')

#write.csv(mydat, "COVID19_world.csv")

gt(tail(mydat, n=4))

Cual son los paises incluido en esta archivo

Ejercicio 1

5 puntos

Seleccionar variables y filtrar

  • Selecciona las variables de “location”, “new_cases” y “total_death”
  • Filtrar para los datos de UN pais solamente.

Produzca un gráfico de Wilkinson

  • Selecciona un solapamiento de los datos para poder ver toso los puntos

Ejercicio 2

5 puntos

Seleccionar variables y filtrar

  • Selecciona las variables de “location”, “new_cases” y “total_death”
  • Filtrar para los datos de dos paises caribeño. Nota que no he enseñado como seleccionar más de un país, mira a ver si encuentra solución en el internet. Si no la encuentra, habla con colegas de la clase. Si todavía no lo encuentra comunicarse conmigo.

Produzca un gráfico de Wilkinson

  • Selecciona un solapamiento de los datos para poder ver toso los puntos y posiciona los datos de los dos países uno al lado del otro.

Bono

3 puntos

Selecciona cinco países pequeños del Caribe y reproduzca la gráfica anterior. Para que la gráfica se puede apreciar tendrán que usar los países con poblaciones más pequeño.

Someter los script y gráfico en un documento .html en MSTEAM