select(dateRep, cases, countriesAndTerritories)%>% separate(col= dateRep, into = c("day","month","year"),