---
title: "Tablero univalle"
author: "Marielys Diaz"
output:
  flexdashboard::flex_dashboard:
    orientation: rows
    social: menu
    source_code: embed
date: "2025-05-13"
---


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

### Estadísticas del conjunto de datos iris


```{r}
data(iris)     ## llama los datos iris
head(iris)     ## muestras los registros del conjunto de datos
summary(iris)  ## estadisticas

```


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

### Histograma 1

```{r}
library(ggplot2)
ggplot(iris, aes(x=Sepal.Length))+
  geom_histogram(fill="blue")

```


### Histograma 2

```{r}
ggplot(iris, aes(x=Sepal.Width))+
  geom_histogram(fill="green")

```

### Histograma 3

```{r}
ggplot(iris, aes(x=Petal.Length))+
  geom_histogram(fill="purple")
```


Cajas
================================================================================

Row
--------------------------------------------------------------------------------

### Caja 1

```{r}
ggplot(iris, aes(y=Sepal.Length))+
  geom_boxplot(fill="blue")
```



### Caja 2

```{r}
ggplot(iris, aes(y=Sepal.Width))+
  geom_boxplot(fill="green")
```

Se observa que tiene datos atípicos

### Caja 3

```{r}
ggplot(iris, aes(y=Petal.Length))+
  geom_boxplot(fill="purple")
```


*se puede para el informe si tiene numerica y cualitativa*

Análisis por Especies
================================================================================
Row 
--------------------------------------------------------------------------------

### Sepal Length vs Species.

```{r caja1}
ggplot(iris, aes(y=Sepal.Length, x=Species, fill=Species))+
  geom_boxplot()
```



### Petal.Length vs Species.

```{r caja2}
ggplot(iris, aes(y=Petal.Length, x=Species, fill=Species))+
  geom_boxplot()
```


*para el avance también*

Asociación Lineal
================================================================================
Row
--------------------------------------------------------------------------------

### Sepal.Length vs Petal.Length


```{r dispersion}
ggplot(iris, aes(x=Sepal.Length, y=Petal.Length))+
  geom_jitter(color="pink")+
  geom_smooth(method="lm", color="black")
```