---
title: "EDA for Quine Dataset"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: scroll
    theme: lumen
    social: menu
    source_code: embed
---

```{r setup, include=FALSE}
library(flexdashboard)
library(MASS)
library(lattice)
library(DT)

```

## Dataset Description {.tabset}

## About Dataset Structure
-----------------------------------------------------------------------
```{r}
str(quine)
```
## Summary of dataset
```{r}
summary(quine)
```
## Univarient Analysis {.tabset}
### Analysis of learners

```{r}
hist(quine$Days)
```
```{r}
datatable(quine, extensions = 'Buttons',options = list(dom='Bfrtip', Buttons=c('copy','csv','print','pdf')))
```


### Chart A

```{r}

```

Column {data-width=1000}
-----------------------------------------------------------------------

### Chart B

```{r}

```

### Chart C

```{r}

```