Convert percentages to frequency classes
add_freq_class(per_pres)
Factor with levels always, often, frequent, occasional, and infrequent
add_freq_class(c(2,20,40,60,100))
#> [1] infrequent occasional occasional frequent always
#> Levels: always often frequent occasional infrequent