Datos_irrigation

##ejercicio con datos de irrigacion en cultivos

Este experimento muestra el procesamiento de la base de datos de irrigacion en cultivos, se encuentra en la base irrigation de la libreria faraway.

require(faraway)

## Loading required package: faraway

data("irrigation")
datos1=irrigation
head(datos1)

##   field irrigation variety yield
## 1    f1         i1      v1  35.4
## 2    f1         i1      v2  37.9
## 3    f2         i2      v1  36.7
## 4    f2         i2      v2  38.2
## 5    f3         i3      v1  34.8
## 6    f3         i3      v2  36.4

La base de datos cuenta con 4 variables: el campo(field), los cuatro metodos de irrigacion(irrigation) utilizados en el experimento, las dos variedades(variety) que se utilizaron y el rendimiento(yield) en kg/ha que tuvieron los cultivos en el experimento. Objetivo: determinar el rendimiento de los cultivos bajos cuatro metodos de riego distintos.

##explorar datos

require(ggplot2)

## Loading required package: ggplot2

gg1=ggplot(data = datos1, aes(x=yield, fill=yield))+geom_histogram()+theme_bw()
gg1

## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.

gg2=ggplot(data = datos1, aes(x=irrigation, fill=irrigation))+geom_bar()+theme_bw()
gg2

gg3=ggplot(data = datos1, aes(x=variety, fill=variety))+ geom_bar()+theme_bw()
gg3

summary(datos1$yield)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   34.80   37.60   40.15   40.23   42.73   47.60

En la grafica de Rendimiento se evidencia variabilidad en los datos presentados, a diferencia de las graficas de Irrigacion y Variedad que demuestran cada una un balance en sus datos.

G1=ggplot(data = datos1, aes(y=yield, x=irrigation, fill=irrigation))+geom_boxplot()+theme_bw()
G1

G2=ggplot(data = datos1, aes(y=yield, x=variety, fill=variety))+geom_boxplot()+theme_bw()
G2

Se usaron graficas para analizar por separado los datos obtenidos en Rendimiento-Irrigacion y Rendimiento-Variedad.

• Grafica Rendimiento-Irrigacion: el metodo de I4 presento mayor rendimiento en los cultivos, seguido de I3, I2 e I1 respectivamente. Adicionalmente se evidencio que la diferencia entre I4 y los demas metodos de riego es mayor que I3-I2 o I2-I1.
• Grafica Rendimiento-Variedad:de las dos variedades usadas en el experiemento; la V2 presento un mejor rendimiento, ya que presento datos mas homogeneos y con menos variabilidad en comparacion con la V1.Ademas, la V2 presento un dato atipico que puede influir en el analisis de los rendimientos de los distintos metodos de riego en los cultivos.

datos1$interaction= datos1$irrigation:datos1$variety
datos1$interaction

##  [1] i1:v1 i1:v2 i2:v1 i2:v2 i3:v1 i3:v2 i4:v1 i4:v2 i1:v1 i1:v2 i2:v1 i2:v2
## [13] i3:v1 i3:v2 i4:v1 i4:v2
## Levels: i1:v1 i1:v2 i2:v1 i2:v2 i3:v1 i3:v2 i4:v1 i4:v2

G3=ggplot(data =datos1, aes(y=yield, x=interaction, fill=interaction))+geom_boxplot()+theme_bw()
G3

Se realizo la interaccion entre Irrigacion y Variedad con el fin de elaborar una analisis mas detallado de la base de datos.

La grafica refleja que el metodo de riego 4 en la variedad 2 de cultivo(I4:V2) tiene mejor rendimiento en comparacion con lo obtenido en el resto de datos.los datos obtenidos en cada interaccion evidencian homogeneidad, sin embargo, en las cajas que presentan menor rango hay menor variabilidad, tales como I1:V2, I2:V2 e I1:V2.