Изменение порядка уровней, ссылка
males$farmer2 <- relevel(males$farmer, ref = "yes")
Diana H
males$farmer2 <- relevel(males$farmer, ref = "yes")