pt_cont_long fails when all data summary is declined

library(pmtables)

pt_cont_long(pmt_first, cols = "AGE,WT,CRCL",
             by = c(Renal = "RF"),
             summarize_all = FALSE)
#> $data
#> # A tibble: 12 × 7
#>    Renal Variable n     Mean  Median SD    `Min / Max`
#>    <fct> <fct>    <chr> <chr> <chr>  <chr> <chr>      
#>  1 mild  AGE      10    30.2  32.8   6.03  19.3 / 35.6
#>  2 mod   AGE      10    34.6  35.2   9.63  19.6 / 48.4
#>  3 norm  AGE      130   33.8  33.4   8.94  18.9 / 49.5
#>  4 sev   AGE      10    34.4  34.9   9.43  20.9 / 47.7
#>  5 mild  WT       10    71.0  69.0   11.6  53.1 / 87.3
#>  6 mod   WT       10    67.8  62.8   16.8  43.6 / 91.0
#>  7 norm  WT       127   71.1  70.4   12.6  50.5 / 97.2
#>  8 sev   WT       10    68.6  65.0   13.7  50.5 / 88.2
#>  9 mild  CRCL     9     74.2  74.8   7.48  65.9 / 85.4
#> 10 mod   CRCL     10    43.2  42.9   8.24  32.3 / 56.2
#> 11 norm  CRCL     125   103   102    8.53  90.6 / 126 
#> 12 sev   CRCL     10    22.6  22.6   3.77  15.4 / 28.9
#> 
#> $align
#> $complete
#> NULL
#> 
#> $default
#> [1] "c"
#> 
#> $update
#> list()
#> 
#> $coltype
#> [1] "p"
#> 
#> $outer
#> [1] "lr"
#> 
#> attr(,"class")
#> [1] "aligncol"
#> 
#> $panel
#> $col
#> [1] "Variable"
#> 
#> $prefix_name
#> [1] FALSE
#> 
#> $prefix_skip
#> [1] "All data"
#> 
#> $null
#> [1] FALSE
#> 
#> $dup_err
#> [1] TRUE
#> 
#> $bold
#> [1] TRUE
#> 
#> $it
#> [1] FALSE
#> 
#> $skip
#> [1] ".panel.skip."
#> 
#> $hline
#> [1] TRUE
#> 
#> $jut
#> [1] 0
#> 
#> $nopagebreak
#> [1] TRUE
#> 
#> attr(,"class")
#> [1] "rowpanel"
#> 
#> $bold_cols
#> [1] FALSE
#> 
#> $notes
#> [1] "n: number of records summarized" "SD: standard deviation"         
#> [3] "Min: minimum; Max: maximum"     
#> 
#> attr(,"class")
#> [1] "pmtable" "list"
^{Created on 2024-02-29 with reprex v2.0.2}
metrumresearchgroup / pmtables

pt_cont_long fails when all data summary is declined #329
