DCL.lm <- lm(Resp1 ~ FILA + COL + TRC)
summary(DCL.lm)
## 
## Call:
## lm(formula = Resp1 ~ FILA + COL + TRC)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
##  -9.08  -2.28  -0.28   3.32   9.32 
## 
## Coefficients:
##               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)    123.480      4.868  25.365 8.57e-12 ***
## FILAS\xe1bado   -1.800      4.270  -0.422  0.68078    
## FILALunes      -11.800      4.270  -2.764  0.01716 *  
## FILAMiercoles   -9.400      4.270  -2.202  0.04800 *  
## FILAViernes     -4.200      4.270  -0.984  0.34468    
## COL11           -6.200      4.270  -1.452  0.17211    
## COL14            0.800      4.270   0.187  0.85450    
## COL17            0.600      4.270   0.141  0.89057    
## COL20           -2.400      4.270  -0.562  0.58438    
## TRCEste          0.800      4.270   0.187  0.85450    
## TRCNorte        13.800      4.270   3.232  0.00719 ** 
## TRCOeste         1.000      4.270   0.234  0.81877    
## TRCSur          12.200      4.270   2.857  0.01442 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 6.751 on 12 degrees of freedom
## Multiple R-squared:  0.7463, Adjusted R-squared:  0.4925 
## F-statistic: 2.941 on 12 and 12 DF,  p-value: 0.03678
anova(DCL.lm)
## Analysis of Variance Table
## 
## Response: Resp1
##           Df Sum Sq Mean Sq F value  Pr(>F)  
## FILA       4 502.56 125.640  2.7569 0.07757 .
## COL        4 174.16  43.540  0.9554 0.46626  
## TRC        4 931.76 232.940  5.1113 0.01224 *
## Residuals 12 546.88  45.573                  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## Analysis of Variance Table
## 
## Response: Resp1
##           Df Sum Sq Mean Sq F value  Pr(>F)  
## FILA       4 502.56 125.640  2.7569 0.07757 .
## COL        4 174.16  43.540  0.9554 0.46626  
## TRC        4 931.76 232.940  5.1113 0.01224 *
## Residuals 12 546.88  45.573                  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##             Df Sum Sq Mean Sq F value Pr(>F)  
## FILA         4  502.6  125.64   2.757 0.0776 .
## COL          4  174.2   43.54   0.955 0.4663  
## TRC          4  931.8  232.94   5.111 0.0122 *
## Residuals   12  546.9   45.57                 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## Warning: package 'agricolae' was built under R version 4.4.2
## [1] 5.526197

Evaluación de los Supuestos del modelo estadístico matemático

Prueba de normalidad Shapiro-Wilk

Hipótesis Ho: Los residuos siguen la distribución normal Ha: Los residuos no siguen la distribución normal

## 
##  Shapiro-Wilk normality test
## 
## data:  DCL.lm$res
## W = 0.97948, p-value = 0.8746
## 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] 10 13

Gráfico de predichos contra residuos estandarizados

Prueba de independencia

## Warning: package 'lmtest' was built under R version 4.4.3
## Cargando paquete requerido: zoo
## Warning: package 'zoo' was built under R version 4.4.3
## 
## Adjuntando el paquete: 'zoo'
## The following objects are masked from 'package:data.table':
## 
##     yearmon, yearqtr
## The following objects are masked from 'package:base':
## 
##     as.Date, as.Date.numeric
## 
##  Durbin-Watson test
## 
## data:  DCL.lm
## DW = 2.2798, p-value = 0.9786
## alternative hypothesis: true autocorrelation is not 0

Pruebas de comparación múltiple de medias

## 
## Study: DCL.aov ~ "TRC"
## 
## LSD t Test for Resp1 
## 
## Mean Square Error:  45.57333 
## 
## TRC,  means and individual ( 95 %) CI
## 
##        Resp1       std r       se      LCL      UCL Min Max Q25 Q50 Q75
## Centro 116.6 14.724130 5 3.019051 110.0221 123.1779 100 133 102 124 124
## Este   117.4  5.366563 5 3.019051 110.8221 123.9779 112 124 112 118 121
## Norte  130.4  3.911521 5 3.019051 123.8221 136.9779 124 134 130 131 133
## Oeste  117.6  4.560702 5 3.019051 111.0221 124.1779 112 122 114 118 122
## Sur    128.8  4.919350 5 3.019051 122.2221 135.3779 123 133 124 131 133
## 
## Alpha: 0.05 ; DF Error: 12
## Critical Value of t: 2.178813 
## 
## least Significant Difference: 9.302621 
## 
## Treatments with the same letter are not significantly different.
## 
##        Resp1 groups
## Norte  130.4      a
## Sur    128.8      a
## Oeste  117.6      b
## Este   117.4      b
## Centro 116.6      b
## 
## Study: DCL.aov ~ "TRC"
## 
## HSD Test for Resp1 
## 
## Mean Square Error:  45.57333 
## 
## TRC,  means
## 
##        Resp1       std r       se Min Max Q25 Q50 Q75
## Centro 116.6 14.724130 5 3.019051 100 133 102 124 124
## Este   117.4  5.366563 5 3.019051 112 124 112 118 121
## Norte  130.4  3.911521 5 3.019051 124 134 130 131 133
## Oeste  117.6  4.560702 5 3.019051 112 122 114 118 122
## Sur    128.8  4.919350 5 3.019051 123 133 124 131 133
## 
## Alpha: 0.05 ; DF Error: 12 
## Critical Value of Studentized Range: 4.50771 
## 
## Minimun Significant Difference: 13.609 
## 
## Treatments with the same letter are not significantly different.
## 
##        Resp1 groups
## Norte  130.4      a
## Sur    128.8     ab
## Oeste  117.6     ab
## Este   117.4     ab
## Centro 116.6      b
## Warning: package 'ScottKnott' was built under R version 4.4.3
## Goups of means at sig.level = 0.05 
##         Means G1 G2
## Norte  130.40  a   
## Sur    128.80  a   
## Oeste  117.60     b
## Este   117.40     b
## Centro 116.60     b