lyt1 <- basic_table() %>%
split_cols_by("ARM") %>%
analyze("AGE", afun = mean, format = "xx.xx")
tbl1 <- build_table(lyt1, DM)
tbl1
lyt2 <- basic_table() %>%
split_cols_by("ARM") %>%
analyze("AGE", afun = sd, format = "xx.xx") %>%
add_existing_table(tbl1)
tbl2 <- build_table(lyt2, DM)
tbl2
table_structure(tbl2)
row_paths_summary(tbl2)
Run the code above in your browser using DataLab