add a footer row in a FlexTable
addFooterRow(x, value, colspan, text.properties, par.properties,
cell.properties)
a FlexTable
object
FlexRow
object to insert as a footer row or a
character vector specifying labels to use as columns labels.
integer vector. Optional. Applies only when argument value
is a character vector. Vector specifying the number of columns to span
for each corresponding value (in values
).
Optional. textProperties to apply to each cell. Used only if values are not missing.
Optional. parProperties to apply to each cell. Used only if values are not missing.
Optional. cellProperties to apply to each cell. Used only if values are not missing.
# NOT RUN { # simple example ---- MyFTable <- FlexTable( data = iris[1:5,1:4] ) # add a footer row with 1 cell that spans four columns MyFTable <- addFooterRow( MyFTable, value = c("a note in table footer"), colspan = 4 ) # another example ---- # create a FlexTable MyFTable <- FlexTable( data = iris[1:5,1:4] ) # define a complex formatted text mytext <- pot("*", format = textProperties( vertical.align="superscript", font.size = 9) ) + pot( " this text is superscripted", format = textProperties(font.size = 9) ) # create a FlexRow - container for 1 cell footerRow <- FlexRow() footerRow[1] <- FlexCell( mytext, colspan = 4 ) # finally, add the FlexRow to the FlexTable MyFTable <- addFooterRow( MyFTable, footerRow ) # }