rostools / r-cubed-intermediate

Reproducible Research in R: An Intermediate Workshop on Modern Approaches and Workflows to Processing Data
https://r-cubed-intermediate.rostools.org/
Other
5 stars 4 forks source link

Add names_glue argument to pivot wider #73

Closed AndersAskeland closed 3 months ago

AndersAskeland commented 4 months ago

Gives prettier output .

Code:

    tidyr::pivot_wider(
        names_from = day,
        values_from = dplyr::starts_with("value"),
        names_glue = "day_{day}"
    )
AndersAskeland commented 4 months ago

To allow list arguments one can use

    tidyr::pivot_wider(
        names_from = day,
        values_from = dplyr::starts_with("value"),
        names_glue = "{.value}_day_{day}"
    )

Potentially also add an across to remove value.

 |>
    dplyr::rename_with(\(x) stringr::str_remove(x, "value_"))