Diseño Completamente al azar

Problema a analizar: Se desea probar el efecto de probar el efecto de diferentes fuentes de azúcar sobre la actividad enzimática de las xilanasas,. Variable Respuesta: actividad enzimática xilanasa en UI obtenidos al final del cultivo para cada tratamiento ensayado con diferentes fuentes de azúcar

##     Fuente             Xilanasa    
##  Length:12          Min.   :150.0  
##  Class :character   1st Qu.:207.5  
##  Mode  :character   Median :270.0  
##                     Mean   :265.0  
##                     3rd Qu.:312.5  
##                     Max.   :380.0

Cálculo de ANOVA y el Modelo Lineal

##             Df Sum Sq Mean Sq F value   Pr(>F)    
## Fuente       5  61600   12320   246.4 7.43e-07 ***
## Residuals    6    300      50                     
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Call:
## lm(formula = Xilanasa ~ Fuente)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
##     -5     -5      0      5      5 
## 
## Coefficients:
##                 Estimate Std. Error t value Pr(>|t|)    
## (Intercept)      375.000      5.000  75.000 3.78e-10 ***
## FuenteGalactosa -120.000      7.071 -16.971 2.68e-06 ***
## FuenteGlucosa    -60.000      7.071  -8.485 0.000147 ***
## FuenteLactosa    -90.000      7.071 -12.728 1.44e-05 ***
## FuenteSacarosa  -220.000      7.071 -31.113 7.32e-08 ***
## FuenteXilosa    -170.000      7.071 -24.042 3.40e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 7.071 on 6 degrees of freedom
## Multiple R-squared:  0.9952, Adjusted R-squared:  0.9911 
## F-statistic: 246.4 on 5 and 6 DF,  p-value: 7.43e-07

Supuestos del Diseño Experimental

1.Normalidad

## 
##  Shapiro-Wilk normality test
## 
## data:  residuals(fit)
## W = 0.64978, p-value = 0.0002884

De manera gráfica, se puede evidenciar la normalidad

## Warning: package 'car' was built under R version 4.4.2
## Cargando paquete requerido: carData
## Warning: package 'carData' was built under R version 4.4.2

## [1] 1 2

2.Homocedasticidad

## 
##  Bartlett test of homogeneity of variances
## 
## data:  Xilanasa by Fuente
## Bartlett's K-squared = 0, df = 5, p-value = 1

3.Independencia

Pruebas Aposteriori

## Warning: package 'agricolae' was built under R version 4.4.2
## 
## Study: fit ~ "Fuente"
## 
## LSD t Test for Xilanasa 
## 
## Mean Square Error:  50 
## 
## Fuente,  means and individual ( 95 %) CI
## 
##           Xilanasa      std r se      LCL      UCL Min Max   Q25 Q50   Q75
## Fructosa       375 7.071068 2  5 362.7654 387.2346 370 380 372.5 375 377.5
## Galactosa      255 7.071068 2  5 242.7654 267.2346 250 260 252.5 255 257.5
## Glucosa        315 7.071068 2  5 302.7654 327.2346 310 320 312.5 315 317.5
## Lactosa        285 7.071068 2  5 272.7654 297.2346 280 290 282.5 285 287.5
## Sacarosa       155 7.071068 2  5 142.7654 167.2346 150 160 152.5 155 157.5
## Xilosa         205 7.071068 2  5 192.7654 217.2346 200 210 202.5 205 207.5
## 
## Alpha: 0.05 ; DF Error: 6
## Critical Value of t: 2.446912 
## 
## least Significant Difference: 17.30228 
## 
## Treatments with the same letter are not significantly different.
## 
##           Xilanasa groups
## Fructosa       375      a
## Glucosa        315      b
## Lactosa        285      c
## Galactosa      255      d
## Xilosa         205      e
## Sacarosa       155      f

Otra opcion cuando cambiamos el argumento “group” a F(false)

## 
## Study: fit ~ "Fuente"
## 
## LSD t Test for Xilanasa 
## 
## Mean Square Error:  50 
## 
## Fuente,  means and individual ( 95 %) CI
## 
##           Xilanasa      std r se      LCL      UCL Min Max   Q25 Q50   Q75
## Fructosa       375 7.071068 2  5 362.7654 387.2346 370 380 372.5 375 377.5
## Galactosa      255 7.071068 2  5 242.7654 267.2346 250 260 252.5 255 257.5
## Glucosa        315 7.071068 2  5 302.7654 327.2346 310 320 312.5 315 317.5
## Lactosa        285 7.071068 2  5 272.7654 297.2346 280 290 282.5 285 287.5
## Sacarosa       155 7.071068 2  5 142.7654 167.2346 150 160 152.5 155 157.5
## Xilosa         205 7.071068 2  5 192.7654 217.2346 200 210 202.5 205 207.5
## 
## Alpha: 0.05 ; DF Error: 6
## Critical Value of t: 2.446912 
## 
## Comparison between treatments means
## 
##                      difference pvalue signif.       LCL       UCL
## Fructosa - Galactosa        120 0.0000     *** 102.69772 137.30228
## Fructosa - Glucosa           60 0.0001     ***  42.69772  77.30228
## Fructosa - Lactosa           90 0.0000     ***  72.69772 107.30228
## Fructosa - Sacarosa         220 0.0000     *** 202.69772 237.30228
## Fructosa - Xilosa           170 0.0000     *** 152.69772 187.30228
## Galactosa - Glucosa         -60 0.0001     *** -77.30228 -42.69772
## Galactosa - Lactosa         -30 0.0054      ** -47.30228 -12.69772
## Galactosa - Sacarosa        100 0.0000     ***  82.69772 117.30228
## Galactosa - Xilosa           50 0.0004     ***  32.69772  67.30228
## Glucosa - Lactosa            30 0.0054      **  12.69772  47.30228
## Glucosa - Sacarosa          160 0.0000     *** 142.69772 177.30228
## Glucosa - Xilosa            110 0.0000     ***  92.69772 127.30228
## Lactosa - Sacarosa          130 0.0000     *** 112.69772 147.30228
## Lactosa - Xilosa             80 0.0000     ***  62.69772  97.30228
## Sacarosa - Xilosa           -50 0.0004     *** -67.30228 -32.69772