lyt <- basic_table() |>
split_cols_by("ARM") |>
add_colcounts() |>
split_rows_by("SEX") |>
append_varlabels(DM, "SEX") |>
analyze("AGE", afun = mean) |>
append_varlabels(DM, "AGE", indent = 1)
build_table(lyt, DM)
lyt <- basic_table() |>
split_cols_by("ARM") |>
split_rows_by("SEX") |>
analyze("AGE", afun = mean) |>
append_varlabels(DM, c("SEX", "AGE"))
build_table(lyt, DM)
Run the code above in your browser using DataLab