about.Rmd

---
title: "About this blog"
description: |
  Covid-19 : the menace to the global community in an era when homosapiense is boasting its technological superiority. I also joined the league of those researchers who are on a mission to find some insight that might help the global community to face the menace the better way scientifically.


---




```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE)
```

```{css, echo = FALSE}
.fill {
  color: red;
  font-weight: bold;
}
h2 {
  color: #006DAE;
}

```



 

![Source:https://commons.wikimedia.org/wiki/File:Covid-19-curves-graphic2-stopthespread-v2.gif](https://upload.wikimedia.org/wikipedia/commons/3/32/Covid-19-curves-graphic2-stopthespread-v2.gif)



## Covid-19 Data Collection



Live and historical data available in public domain on Covid-19 of the United Kingdom and Egypt are explored.

### Data description

```{css, echo = FALSE}
.fill {
  color: #4a88ed;
  font-weight: bold;
}
.fill1 {
  color: #002259;
  font-weight: normal;
}
h2 {
  color: #006DAE;
}

```

Dataset is collected from Joachim Gassen's [[**Github-repository**]{.fill}](https://github.com/joachim-gassen/tidycovid19)

The data is updated on a daily basis.

To know about covid-19 click [[here]{.fill1}](https://www.unicef.org/stories/novel-coronavirus-outbreak-frequently-asked-questions)



```{r echo = FALSE, warning = FALSE,message=FALSE}
library(tidyverse)
library(tidycovid19)
library(zoo)
library(plotly)
library(kableExtra)
df <- tidycovid19_variable_definitions %>%
  select(var_name, var_def)
kable(df) %>% kableExtra::kable_styling()
```