Expands the width either supercolumns or the subcolumns so that the
the sum of the supercolumn widths is the same as the sum of the
subcolumn widths.
Usage
equalBins(widths, subwidths)
Arguments
- widths
widths of the supercolumns.
- subwidths
list of widths of the subcolumns for each supercolumn.
Details
This determins the correct subwidths of each of various columns in a table
for printing. The correct width of the multicolumns is deterimed by
summing the widths of it subcolumns.
Value
widths of the the columns for a table.
Examples
mcols <- c("Group 1", "Group 2")
mwidth <- nchar(mcols, type="width")
spancols <- c(3,3)
ccols <- c("a", "deer", "ad", "cat", "help", "bob")
cwidth <- nchar(ccols, type="width")
subwidths <- partition.vector(cwidth, spancols)
equalBins(mwidth, subwidths)
#> 11 12 13 21 22 23
#> 1 4 2 3 4 3