forest_scale=mutate_if(forest,is.numeric,scale)nonforest_scale=mutate_if(nonforest,is.numeric,scale)# additive formularformular00=as.formula(paste("Bacteria_richness~",paste(c(envs,'Forest','(1|CLIMA2)','(1|LandUse)'),collapse="+")))formular01=as.formula(paste("Plant_richness~",paste...