See the panel argument to stable(). This function cannot be used to
operate on pmtable objects.
st_panel(x, ...)an stobject
passed to rowpanel()
library(dplyr)
ob <- st_new(ptdata())
ob %>% st_panel("STUDY") %>% st_make()
#> [1] "\\setlength{\\tabcolsep}{5pt} "
#> [2] "\\begin{threeparttable}"
#> [3] "\\renewcommand{\\arraystretch}{1.3}"
#> [4] "\\begin{tabular}[h]{llllllll}"
#> [5] "\\hline"
#> [6] "DOSE & FORM & N & WT & CRCL & AGE & ALB & SCR \\\\"
#> [7] "\\hline"
#> [8] "\\multicolumn{8}{l}{\\textbf{12-DEMO-001}}\\\\%--pmtables-insert-panel"
#> [9] "100 mg & tablet & 80 & 71.4 & 104 & 33.7 & 4.20 & 1.06 \\\\"
#> [10] "150 mg & capsule & 16 & 89.4 & 122 & 24.4 & 4.63 & 1.12 \\\\"
#> [11] "150 mg & tablet & 48 & 81.7 & 104 & 34.4 & 3.83 & 0.910 \\\\"
#> [12] "150 mg & troche & 16 & 94.0 & 93.2 & 27.4 & 4.94 & 1.25 \\\\"
#> [13] "200 mg & tablet & 64 & 67.9 & 100 & 27.5 & 4.25 & 1.10 \\\\"
#> [14] "200 mg & troche & 16 & 76.6 & 99.2 & 22.8 & 4.54 & 1.15 \\\\"
#> [15] "\\hline \\multicolumn{8}{l}{\\textbf{12-DEMO-002}}\\\\%--pmtables-insert-panel"
#> [16] "100 mg & capsule & 36 & 61.3 & 113 & 38.3 & 4.04 & 1.28 \\\\"
#> [17] "100 mg & tablet & 324 & 77.6 & 106 & 29.9 & 4.31 & 0.981 \\\\"
#> [18] "50 mg & capsule & 36 & 74.1 & 112 & 37.1 & 4.44 & 0.900 \\\\"
#> [19] "50 mg & tablet & 324 & 71.2 & 106 & 34.1 & 4.63 & 0.868 \\\\"
#> [20] "75 mg & capsule & 36 & 72.4 & 105 & 38.2 & 3.89 & 0.900 \\\\"
#> [21] "75 mg & tablet & 288 & 71.6 & 98.9 & 34.2 & 4.49 & 0.991 \\\\"
#> [22] "75 mg & troche & 36 & 73.6 & 103 & 49.2 & 4.52 & 0.930 \\\\"
#> [23] "\\hline"
#> [24] "\\end{tabular}"
#> [25] "\\end{threeparttable}"
#> attr(,"class")
#> [1] "stable"