Buat nama faktor
table(male.flies$PARTNERS)
male.flies$PARTNERS <- as.factor(male.flies$PARTNERS)
levels(male.flies$PARTNERS)
levels(male.flies$PARTNERS) <- c("NoPartners", "OnePartner", "MultiplePartners")
table(male.flies$PARTNERS)
Diana H