data <- tibble::tribble(
~session_id, ~a, ~b, ~c, ~a__severe, ~b__severe, ~c__severe,
"ses-00A", "1", "1", "1", "1", NA, NA,
"ses-01A", "1", "1", "1", "2", "777", "2"
)
data |>
ss_sum_mh_ple(
name = "sum",
fork_vars = c("a", "b", "c"),
vars = paste0(c("a", "b", "c"), "__severe"),
max_na = 1,
exclude = c("777", "999")
)
Run the code above in your browser using DataLab