Facet checks (helper)

Usage

check_facet_vec(x, type)

Arguments

x: a vector
type: type of column to return.

Value

TRUE/FALSE if facet variable (< 5 levels)

Examples

require(NHANES)
check_facet_vec(NHANES::NHANES$Education, type = "fct")
#> [1] FALSE
levels(NHANES::NHANES$Education)
#> [1] "8th Grade"      "9 - 11th Grade" "High School"    "Some College"  
#> [5] "College Grad"  
check_facet_vec(NHANES::NHANES$MaritalStatus, type = "fct")
#> [1] FALSE
levels(NHANES::NHANES$MaritalStatus)
#> [1] "Divorced"     "LivePartner"  "Married"      "NeverMarried" "Separated"   
#> [6] "Widowed"