Have you ever heard of the lyrics: “Imagine there’s no countries. It isn’t hard to do.” from the song “Imagine” by John Lennon. It was not that difficult to imagine under the globalization before everything started in 2019. However, the world has changed since then. I believe that COVID-19 is already a familiar term to you all as it has been affecting all humankind for nearly 2 years since its outbreak, right? Due to the Pandemic, the borders had shut down one after another, the cities were locked down. The living styles had also changed a lot, such as people are working online, students are studying online which leads to a boom in online industry. Since it has been affecting us for a long period of time and it is still existing, it is necessary for us to know more about it and fight against the disaster together so as to restore the order of the world.
Covid-19 is an an infectious disease caused by severe acute respiratory coronavirus which have brought a pandemic to the mankind since late 2019. Up to late August, 2021, more than 200 million confirmed cases have been reported in countries and regions around the world. Meanwhile the numbers are still rising.
On average, it takes 5–6 days from someone who has infected with the virus for symptoms to show, however it can take up to 14 days. The symptoms include:
Most common symptoms:
Less common symptoms:
Serious symptoms:
Based on the map, it is found that, Russia, France, United Kingdom, etc have more confirmed cases compare to the others. Whereas, the Southern European and Northern European got less number of confirmed. The possible reason is that the population in this countries are lower. The map above is an interactive map which includes the total number of confirmed up to 8/25/2021. You can move your mouse on the map to check on the cases confirmed in each countries.
| Ranking | Country | Number of confirmed |
|---|---|---|
| 1 | Andorra | 178977 |
| 2 | San Marino | 173493 |
| 3 | Montenegro | 166229 |
| 4 | Czechia | 164326 |
| 5 | Luxembourg | 153143 |
| 6 | Slovenia | 131949 |
| 7 | Sweden | 123694 |
| 8 | Spain | 118821 |
| 9 | Netherlands | 117314 |
| 10 | Belgium | 112644 |
| 11 | Estonia | 107696 |
| 12 | United Kingdom | 106353 |
| 13 | France | 105494 |
| 14 | Serbia | 101458 |
| 15 | Switzerland | 100624 |
| 16 | Monaco | 95950 |
| 17 | Portugal | 95805 |
| 18 | Liechtenstein | 93409 |
| 19 | Malta | 88626 |
| 20 | Lithuania | 83082 |
| 21 | Austria | 82845 |
| 22 | Croatia | 82636 |
| 23 | Hungary | 81907 |
| 24 | Ireland | 81445 |
| 25 | Italy | 77459 |
| 26 | Poland | 75027 |
| 27 | Kosovo | 74698 |
| 28 | Slovakia | 72173 |
| 29 | Latvia | 63426 |
| 30 | Denmark | 62155 |
| 31 | Bulgaria | 62001 |
| 32 | Moldova | 61521 |
| 33 | Greece | 53093 |
| 34 | Ukraine | 51901 |
| 35 | Romania | 49199 |
| 36 | Belarus | 49008 |
| 37 | Russia | 47912 |
| 38 | Germany | 47511 |
| 39 | Bosnia and Herzegovina | 45749 |
| 40 | Albania | 38842 |
| 41 | Iceland | 33718 |
| 42 | Norway | 32530 |
| 43 | Finland | 23548 |
After adjusting the confirmed cases by population, it’s a different story. From the table of total number of confirmed cases(per 10000 population), it is found that some of the Northern Europeans like Sweden, Luxembourg are ranking high with the percentage of confirmed cases. Whereas, those who were having high total number of confirmed like Russia, France and Italy are ranking comparatively lower than before. While our focus country Austria is ranking 21/43 which is nearly the median of the European states.
Austria is located in Central Europe. It is bordered by the Czech Republic and Germany to the north, Slovakia and Hungary to the east, Slovenia and Italy to the south, and Switzerland and Liechtenstein to the west.
Vienna is the capital city of Austria which is always associated with music. It is a dreamland for those who are in love of classical music. Since I have learned playing piano when I was young, I have been practicing a lot of songs from the Austrian musician like Ludwig van Beethoven, Franz Joseph Haydn, Wolfgang Amadeus Mozart, etc. Austria is always where I wanted to go. And this is the reason why I am interested to study the COVID-19 situation in this country. So as to know when will we be able to enter Austria.
There are totally two data set used in this blog. The first data set is the global cases information of the coronavirus. The second one is the status of vaccinations in European countries. Both of them were downloaded from github. The former is from RamiKrispin’s github Resitory. The original data is maintained by coronavirus package. Whereas the later is from owid’s githu Repository. The original data is maintained by COVID-19 Data Repository by the Center for Systems Science and Engineering (CSSE) at Johns Hopkins University Both of these two data sets are still updating the data, you can check on the the latest data from clicking the hyperlink above.
The raw data of coronavirus data set contains 478404 rows and 7 columns of data. While the vaccinations data set contains 43550 rows and 14 columns.
| vars | n | mean | sd | median | trimmed | mad | min | max | range | skew | kurtosis | se | vaccine_type | |
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| total_vaccinations | 1 | 25287 | 67091852.67 | 322513320.61 | 1765378.00 | 7179136.18 | 2561834.95 | 0 | 5.242555e+09 | 5.242555e+09 | 8.69 | 92.47 | 2028145.01 | numeric |
| people_vaccinated | 2 | 24298 | 36988771.15 | 179961795.82 | 1173405.00 | 4660722.95 | 1695015.81 | 0 | 3.128591e+09 | 3.128591e+09 | 9.41 | 108.91 | 1154502.97 | numeric |
| people_fully_vaccinated | 3 | 21230 | 22037296.31 | 105918441.75 | 727643.50 | 2947064.52 | 1060570.50 | 1 | 2.099778e+09 | 2.099778e+09 | 10.09 | 132.81 | 726936.68 | numeric |
| total_boosters | 4 | 524 | 2750338.22 | 3196538.65 | 1228132.50 | 2214347.78 | 1819266.58 | 17 | 1.356909e+07 | 1.356907e+07 | 1.21 | 0.70 | 139641.44 | numeric |
| daily_vaccinations_raw | 5 | 21278 | 986177.19 | 3971016.97 | 34150.00 | 137236.93 | 49069.61 | 0 | 5.615080e+07 | 5.615080e+07 | 6.56 | 49.63 | 27223.02 | numeric |
| daily_vaccinations | 6 | 43282 | 488063.03 | 2747654.28 | 8789.50 | 39004.88 | 12731.83 | 0 | 4.341579e+07 | 4.341579e+07 | 9.37 | 100.72 | 13207.13 | numeric |
| total_vaccinations_per_hundred | 7 | 25287 | 37.36 | 40.97 | 20.44 | 30.91 | 28.32 | 0 | 2.339300e+02 | 2.339300e+02 | 1.19 | 0.71 | 0.26 | numeric |
| people_vaccinated_per_hundred | 8 | 24298 | 23.03 | 22.91 | 14.38 | 20.16 | 19.55 | 0 | 1.175300e+02 | 1.175300e+02 | 0.88 | -0.24 | 0.15 | numeric |
| people_fully_vaccinated_per_hundred | 9 | 21230 | 16.31 | 19.26 | 7.84 | 12.91 | 10.96 | 0 | 1.164000e+02 | 1.164000e+02 | 1.40 | 1.47 | 0.13 | numeric |
| total_boosters_per_hundred | 10 | 524 | 1.82 | 3.71 | 0.15 | 0.90 | 0.20 | 0 | 2.323000e+01 | 2.323000e+01 | 2.90 | 9.72 | 0.16 | numeric |
| daily_vaccinations_per_million | 11 | 43282 | 3514.38 | 4434.90 | 2153.00 | 2798.60 | 2824.35 | 0 | 1.174970e+05 | 1.174970e+05 | 5.01 | 69.98 | 21.32 | numeric |
Based on the trend of the cases, we can see that the trend of the confirmed, death and recovery cases following the same trend. The number of cases were very low from the beginning of the cases entering the country and remained low until late September 2020. There was spark of the cases since then and the number started to drop from the early December. The possible reason was due to the season to winter when the virus is more likely to remain active.
Later on, there was decrease in the number cases when the citizens started to inject the vaccines. This indicate the effectiveness of the vaccines. However, the number increases again from late February when there was the mutant virus such as type Alpha, Beta, Gamma, Delta which are the most dangerous spread around the world. The mutant virus had faster speed of spreading and lowered the effectiveness of the vaccines caused another boom of cases to the whole world. The details are shown in the table below.
From the bar chart above, it is found that people in Austria are quite active in injecting the vaccines. The decreasing trend from July was probably due to most of the citizens had fully injected the vaccines which had lowered the number of daily injection. The detail data is shown as follow.
[NOTE: The time range is from 27 Dec, 2020 to the latest updated data on Aug 28, 2021]
Information in English. (Federal Ministry, Republic of Austria). Retrieved August 28, 2021, from https://www.sozialministerium.at/en/Coronavirus/Information-in-English.html#coronavirus
Austria: WHO Coronavirus Disease (COVID-19) Dashboard With Vaccination Data. (WHO). Retrieved from https://covid19.who.int/region/euro/country/at
Rami Krispin and Jarrett Byrnes (2021). coronavirus: The 2019 Novel Coronavirus COVID-19 (2019-nCoV) Dataset. R package version 0.3.22. https://CRAN.R-project.org/package=coronavirus
Wickham et al., (2019). Welcome to the tidyverse. Journal of Open Source Software, 4(43), 1686, https://doi.org/10.21105/joss.01686
Andy South (2017). rnaturalearth: World Map Data from Natural Earth. R package version 0.1.0. https://CRAN.R-project.org/package=rnaturalearth
Pebesma, E., 2018. Simple Features for R: Standardized Support for Spatial Vector Data. The R Journal 10 (1), 439-446, https://doi.org/10.32614/RJ-2018-009
C. Sievert. Interactive Web-Based Data Visualization with R, plotly, and shiny. Chapman and Hall/CRC Florida, 2020.
Hao Zhu (2021). kableExtra: Construct Complex Table with ‘kable’ and Pipe Syntax. R package version 1.3.4. https://CRAN.R-project.org/package=kableExtra
Yihui Xie, Joe Cheng and Xianying Tan (2021). DT: A Wrapper of the JavaScript Library ‘DataTables’. R package version 0.18. https://CRAN.R-project.org/package=DT
Revelle, W. (2021) psych: Procedures for Personality and Psychological Research, Northwestern University, Evanston, Illinois, USA, https://CRAN.R-project.org/package=psych Version = 2.1.6,.