drawCovidPlot

Draws the plot of the number of covid-19 deaths and confirmed cases during a time series in a specific country

drawCovidPlot(period, country)

Arguments

period	a vector containing the start and end date of the time series
country	name of the chosen country

Value

a ggplot object

Examples

plotOfCovid <- drawCovidPlot(c("04-02-2020","06-12-2020"),"US")
#> 
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#> 
#>     filter, lag
#> The following objects are masked from 'package:base':
#> 
#>     intersect, setdiff, setequal, union
#> -- Attaching packages -------------------- tidyverse 1.3.0 --
#> v ggplot2 3.3.2     v purrr   0.3.4
#> v tibble  3.0.3     v stringr 1.4.0
#> v tidyr   1.1.2     v forcats 0.5.0
#> Warning: package 'ggplot2' was built under R version 4.0.3
#> -- Conflicts ----------------------- tidyverse_conflicts() --
#> x tidyr::complete() masks RCurl::complete()
#> x dplyr::filter()   masks stats::filter()
#> x dplyr::lag()      masks stats::lag()
#> Warning: package 'reshape' was built under R version 4.0.3
#> 
#> Attaching package: 'reshape'
#> The following objects are masked from 'package:tidyr':
#> 
#>     expand, smiths
#> The following object is masked from 'package:dplyr':
#> 
#>     rename
#> Warning: `summarise_each_()` is deprecated as of dplyr 0.7.0.
#> Please use `across()` instead.
#> This warning is displayed once every 8 hours.
#> Call `lifecycle::last_warnings()` to see where this warning was generated.