Setup and data

library(dplyr)
library(pmtables)
id <- pmtables:::data("id")
data <- pmtables:::data("obs")
pk <- filter(data,SEQ==1)
knitr::opts_chunk$set(comment = '.')

Continuous

cols <- .cols(WT,ALB,SCR)

pmtables:::cont_table_data(id,cols)
pmtables:::cont_table_data(id,cols,by = "STUDYf")
pmtables:::cont_table_data(id,cols,wide = TRUE,fun = pmtables:::str_sum_2)
pmtables:::cont_table_data(id,cols,by="STUDYf",wide = TRUE,fun = pmtables:::str_sum_2)

Categorical tables

cols <- .cols(SEXf,CPf,RFf)
pmtables:::cat_data(id,cols,by="FORMf")
cols <- .cols(SEXf,CPf,RFf)
pmtables:::cat_data(id,cols,by = "FORMf")
cols <- .cols(SEXf,CPf,RFf)
pmtables:::cat_data(id,cols,by = "FORMf",wide=TRUE)
cols <- .cols(SEXf,CPf,RFf)
pmtables:::cat_data(id,cols,by = "FORMf",preshape=TRUE)


metrumresearchgroup/pmtables documentation built on Feb. 15, 2025, 5:40 p.m.