I am trying to plot the total number of cumulative cases for COVID-19 using this Canadian dataset

I am trying to plot using provinces "Canada" with date on the X-Axis and Number of cases on the Y-Axis. I wrote a .R script however when the plot generates either there is too many dates or the plot does not show correctly. How can I modify this to show the graph correctly?

I used the filter function to filter all the cases in Canada however would there be a better way to calculate total cumlative number of cases?

```
data <- read.csv("2020-05-20.csv",header=T)
data2 <- filter(data, data$prname == "Canada")
data2 %>%
ggplot(aes(x=date, y=numconf)) +
geom_point() +
geom_line() +
geom_smooth()
```