data(deforestation)
str(deforestation)
table(deforestation$Deforestation)
if (FALSE) { # requireNamespace("FactoMineR", quietly = TRUE)
# Linear model with interaction (FactoMineR):
fit <- FactoMineR::LinearModel(
Temp_water ~ Temp_air * Deforestation,
data = deforestation,
selection = "none"
)
print(fit)
}
Run the code above in your browser using DataLab