[Feature Request]: return layout expression from qtable

[anajens]

Feature description

If qtable can return the expression of the layout (lyt below), new users will be able to see the connection from qtable to the rtables layout framework. This would be a very nice teaching tool. For example:

t1 <- qtable(ex_adsl, col_vars = "ARM", avar = "AGE", afun = mean)

lyt <- basic_table(show_colcounts = TRUE) %>%
  split_cols_by("ARM") %>%
  analyze("AGE", afun = function(x) {
    rcell(mean(x), format = "xx.xx", label = "AGE - mean")
  })

t2 <- build_table(lyt, ex_adsl)

identical(t1, t2)

Code of Conduct

• I agree to follow this project's Code of Conduct.

Contribution Guidelines

• I agree to follow this project's Contribution Guidelines.

Security Policy

• I agree to follow this project's Security Policy.