0
confirmed <- read.csv('time_series_covid_19_confirmed.csv',
stringsAsFactors = FALSE)
library(dplyr)
covid <- confirmed %>% select(Country.Region, X3.29.20) %>%
group_by(Country.Region) %>%
summarise(sum_X3.29.20 = sum(X3.29.20))