fct_case_when: Factor case_when

In pewresearch/pewmethods: Pew Research Center Methods Miscellaneous Functions

Description

Wrapper around dplyr::case_when that converts the output to a factor and preserves the order in which value labels were passed into the function.

Usage

fct_case_when(...)

Arguments

...	A sequence of two-sided formulas consistent with dplyr::case_when.

Details

Unlike case_when, fct_case_when allows factors to be passed in as right-hand-side arguments - they are treated internally as characters, but the resulting vector will preserve the order of the original factor levels.

Value

The output of dplyr::case_when, as class "factor" and ordered however you wanted it.

Examples

library(dplyr)
partysum <- with(dec13_excerpt, fct_case_when(party == "Republican" ~ "Rep/Lean Rep",
                          party == "Democrat"  ~ "Dem/Lean Dem",
                          partyln == "Republican" ~ "Rep/Lean Rep",
                          partyln == "Democrat" ~ "Dem/Lean Dem",
                          TRUE ~ partyln)
                          )

# Compare to normal case_when() and then factor(), which will arrange the levels in
# unwanted alphabetical order

partysum <- with(dec13_excerpt, factor(case_when(party == "Republican" ~ "Rep/Lean Rep",
                             party == "Democrat"  ~ "Dem/Lean Dem",
                             partyln == "Republican" ~ "Rep/Lean Rep",
                             partyln == "Democrat" ~ "Dem/Lean Dem",
                             TRUE ~ as.character(partyln))))

pewresearch/pewmethods documentation built on March 27, 2020, 7:22 p.m.