---
title: "Tablero"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    social: menu
    source_code: embed
---

Estadísticas
================================================================
Row
----------------------------------------------------------------
### Estadísticas


```{r setup}
library(flexdashboard)
data("iris")
summary(iris)
```

Histogramas
================================================================
Row
----------------------------------------------------------------
### Histogramas

```{r hist1}
hist(iris$Sepal.Length, col="blue")
```




### Histograma2

```{r hist2}
hist(iris$Sepal.Width, col="red")
```


Row
----------------------------------------------------------------
### Histograma3

```{r hist3}
hist(iris$Petal.Length, col="green")

```


### Histograma4

```{r hist4}
hist(iris$Petal.Width, col="grey")
```



Boxplot
================================================================
Row
----------------------------------------------------------------
### Boxplot

```{r boxplot1}
boxplot(iris$Sepal.Length, col="blue")
```




### boxplot2

```{r boxplot2}
boxplot(iris$Sepal.Width, col="red")
```


Row
----------------------------------------------------------------
### boxplot3

```{r boxplot3}
boxplot(iris$Petal.Length, col="green")

```


### boxplot4

```{r boxplot4}
boxplot(iris$Petal.Width, col="grey")
```


Correlación 
=======================================================
Row
------------------------------------------------------
### Correlación


```{r correlación}
cor(iris[,1:4])

```


Row
------------------------------------------------------
### Gráfico correlación 

```{r plotcor}
plot(iris[,-5], col=iris$Species)
```



Conclusiones
====================================================
Row
---------------------------------------------------------
### Conclusiones


*Conclusion 1 
*Conclusion 2