mod1=lm(bio_total~diametro+finca,data = data_biomasa)
summary(mod1)
##
## Call:
## lm(formula = bio_total ~ diametro + finca, data = data_biomasa)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.8658 -2.1882 -0.5434 2.0327 12.7402
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -9.7033 1.3822 -7.020 4.83e-10 ***
## diametro 4.9758 0.2730 18.225 < 2e-16 ***
## fincaFINCA_2 1.0459 0.9652 1.084 0.281557
## fincaFINCA_3 3.0739 0.8617 3.567 0.000592 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 3.225 on 86 degrees of freedom
## Multiple R-squared: 0.8489, Adjusted R-squared: 0.8437
## F-statistic: 161.1 on 3 and 86 DF, p-value: < 2.2e-16
##REsutado del modelo
data_biomasa$finca
## [1] "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1"
## [8] "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1"
## [15] "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1"
## [22] "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1" "FINCA_1"
## [29] "FINCA_1" "FINCA_1" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2"
## [36] "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2"
## [43] "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2"
## [50] "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2"
## [57] "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_2" "FINCA_3" "FINCA_3" "FINCA_3"
## [64] "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3"
## [71] "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3"
## [78] "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3"
## [85] "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3" "FINCA_3"
mod1=lm(log(bio_total)~diametro+finca+mg,data=data_biomasa)
summary(mod1)
##
## Call:
## lm(formula = log(bio_total) ~ diametro + finca + mg, data = data_biomasa)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.25355 -0.06083 -0.01964 0.06352 0.18167
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.16651 0.04512 25.856 < 2e-16 ***
## diametro 0.30888 0.01077 28.674 < 2e-16 ***
## fincaFINCA_2 -0.02028 0.03119 -0.650 0.517
## fincaFINCA_3 0.19919 0.02605 7.646 2.90e-11 ***
## mgGENOTIPO_2 -0.13061 0.02683 -4.868 5.14e-06 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.09507 on 85 degrees of freedom
## Multiple R-squared: 0.9531, Adjusted R-squared: 0.9509
## F-statistic: 431.7 on 4 and 85 DF, p-value: < 2.2e-16