Converts a vector object to a categorical object, typically a column in a data frame. The categories come from non-missing values present in the object and are added to an associated data dictionary (when present).
as_category(x)
A vector object to be coerced to categorical.
A vector with class haven_labelled.
{
library(dplyr)
mtcars <- tibble(mtcars)
as_category(mtcars[['cyl']])
head(mtcars %>% mutate(cyl = as_category(cyl)))
}
#>
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#>
#> filter, lag
#> The following objects are masked from 'package:base':
#>
#> intersect, setdiff, setequal, union
#> # A tibble: 6 × 11
#> mpg cyl disp hp drat wt qsec vs am gear carb
#> <dbl> <dbl+lbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 21 6 [6] 160 110 3.9 2.62 16.5 0 1 4 4
#> 2 21 6 [6] 160 110 3.9 2.88 17.0 0 1 4 4
#> 3 22.8 4 [4] 108 93 3.85 2.32 18.6 1 1 4 1
#> 4 21.4 6 [6] 258 110 3.08 3.22 19.4 1 0 3 1
#> 5 18.7 8 [8] 360 175 3.15 3.44 17.0 0 0 3 2
#> 6 18.1 6 [6] 225 105 2.76 3.46 20.2 1 0 3 1