Los datos corresponden a un experimento en el cual se evalúa el efecto de la aplicación de diferentes concentraciones de herbicida e insecticida sobre el crecimiento de plantas de algodón:
library(readxl)## Warning: package 'readxl' was built under R version 4.1.2datos = read_excel("C:/Users/David Borja/Downloads/Clase 3 (1).xlsx")
head(datos)## # A tibble: 6 x 4
## Planta Insecticida Herbicida Delta
## <dbl> <dbl> <dbl> <dbl>
## 1 1 0 0 122
## 2 2 20 0 82.8
## 3 3 40 0 65.8
## 4 4 60 0 68
## 5 5 80 0 57.7
## 6 6 0 0.5 72.5A continuación vamos a realizar una exploración en la relación entre herbicida e insecticida con el delta de crecimiento:
require(ggplot2)## Loading required package: ggplot2## Warning: package 'ggplot2' was built under R version 4.1.2require(plotly)## Loading required package: plotly## Warning: package 'plotly' was built under R version 4.1.2##
## Attaching package: 'plotly'## The following object is masked from 'package:ggplot2':
##
## last_plot## The following object is masked from 'package:stats':
##
## filter## The following object is masked from 'package:graphics':
##
## layoutp=ggplot(data = datos,aes(x=as.factor(Herbicida),y=Delta))
g1=p+geom_boxplot()+theme_bw()
ggplotly(g1)p=ggplot(data = datos,aes(x=as.factor(Insecticida),y=Delta))
g2=p+geom_boxplot()+theme_bw()
ggplotly(g2)El uso de herbicidas no termina afectando considerablemente la tasa de crecimiento delta. Mantiene promedios delta similares al aumentar la cantidad de herbicida. Al no usar herbicida se tiene una desviación inicial mas amplia, que se verá reducida al aplicar herbicida, pero sin que su promedio cambie considerablemente.
En el caso del insecticida, si se notan variaciones del crecimiento delta importantes. Podemos sacar varias conclusiones. La desviación al no usar insecticida resulta alta, teniendo altos valores máximos y bajos valores mínimos delta. En la aplicación de mayores concentraciones de insecticida, se observa una disminución en la desviación y un aumento considerable en el promedio delta al usar 20 unidades de insecticida, que irá decreciendo progresivamente al aumentar las concentraciones de insecticida.