Background

The Monkepox: Daily Confirmed Cases datasets comes from the ‘Monkeypox Data Explorer’ from ourworldindata. You can view these data by clicking on the following link: https://ourworldindata.org/monkeypox


The Monkeypox Data Explorer is updated every hour and allows you to explore the data produced by the World Health Organization. Created by Edouard Mathieu, Fiona Spooner, Saloni Dattani, Hannah Ritchie and Max Roser.

Data

glimpse(mp_raw)
Rows: 16,321
Columns: 15
$ location                        <chr> "Andorra", "Andorra", "Andorra", "Ando…
$ iso_code                        <chr> "AND", "AND", "AND", "AND", "AND", "AN…
$ date                            <date> 2022-07-25, 2022-07-26, 2022-07-27, 2…
$ total_cases                     <dbl> 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4,…
$ total_deaths                    <dbl> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,…
$ new_cases                       <dbl> 2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,…
$ new_deaths                      <dbl> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,…
$ new_cases_smoothed              <dbl> 0.29, 0.43, 0.43, 0.43, 0.43, 0.43, 0.…
$ new_deaths_smoothed             <dbl> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,…
$ new_cases_per_million           <dbl> 25.049, 12.525, 0.000, 0.000, 0.000, 0…
$ total_cases_per_million         <dbl> 25.049, 37.574, 37.574, 37.574, 37.574…
$ new_cases_smoothed_per_million  <dbl> 3.632, 5.386, 5.386, 5.386, 5.386, 5.3…
$ new_deaths_per_million          <dbl> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,…
$ total_deaths_per_million        <dbl> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,…
$ new_deaths_smoothed_per_million <dbl> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,…

New Cases


Date versus new cases

ggplot(data = mp_raw,
       mapping = aes(x = date,
                     y = new_cases,
                     group = location)) +
  geom_line()

New Cases Smoothed


Date versus new cases smoothed

ggplot(data = mp_raw,
       mapping = aes(x = date,
                     y = new_cases_smoothed,
                     group = location)) +
  geom_line()

New Cases per Million


Date versus new cases per million

ggplot(
  data = mp_raw,
  mapping = aes(x = date,
                y = new_cases_per_million,
                group = location)) +
  geom_line()