I have made a statc and a interective map of India to visualize COVID-19 confirmed cases in India state wise as of 1st october 2021. Chechout the tabs:-
## Error : The fig.showtext code chunk option must be TRUE
date<-data_whole$Date %>% as.Date() %>% as.POSIXct()
data_whole<-cbind(date,data_whole)
states <- as.character(unique(data_whole$State))
India <- data_whole%>%subset(., State == "India")
amTimeSeries(India, 'date', c('Confirmed', 'Recovered','Deceased'),bullet = 'round',linewidth = c(3,3,3),group = 'State', main = "Covid cases time series")