NP<100&EC<2000&CN<150&(!Sequencing_ID_16s_18s%in%c('M24','M12','M30')))map=data.frame(sample_data(rarefy))map=mutate(map,Latitude=abs(Latitude),group=case_when(Vegetation=='Forest'~'Forest',TRUE~'NonForest'))map$group=as.factor(map$group)...