---
title: "Exploratory Data Analysis for Quine dataset"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows   
    vertical_layout: scroll
    theme: spacelab
    social: menu
    source_code: embed
---


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

## Dataset Description {.tabset}

### dataset structure
```{r}
library(flexdashboard)
library(MASS)
str(quine)
summary(quine)
```

### Summary of the dataset

## univariate analysis {.tabset}

### Analysis of days

```{r}
library(flexdashboard)
library(MASS)
library(lattice)
histogram(quine$Days)
```

### Age wise learner analysis

```{r}
library(flexdashboard)
library(MASS)
library(lattice)
library(DT)
datatable(quine,extensions = 'Buttons',options = list(dom='Bfrtip',Buttons = c('copy','csv','print','pdf')))
```


```{r}

```