The `PivotStyles` class is a collection of `PivotStyle` objects. It defines all of the base styles needed to style/theme a pivot table. It also defines the names of the styles that are used for styling the different parts of the pivot table.
R6Class object.
countThe number of `PivotStyle` objects in this `PivotStyles` collection.
themeA theme name to represent this collection of styles.
stylesA list containing the `PivotStyle` objects in this `PivotStyles` collection.
allowExternalStylesDefault `FALSE`, which means this `PivotStyles` object checks that style names specified for styling the different parts of the pivot table must exist in the styles collection. If they do not an error will occur. Specify `TRUE` to disable this check, e.g. if the style definitions are not managed by `pivottabler` but instead in an external system.
tableStyleThe name of the style for the HTML table element.
rootStyleThe name of the style for the HTML cell at the top left of the pivot table.
rowHeaderStyleThe name of the style for the row headers in the pivot table.
colHeaderStyleThe name of the style for the column headers in the pivot table.
outlineRowHeaderStyleThe name of the style for the outline row headers in the pivot table.
outlineColHeaderStyleThe name of the style for the outline column headers in the pivot table.
cellStyleThe name of the cell style for the non-total cells in the body of the pivot table.
outlineCellStyleThe name of the cell style for the non-total outline cells in the body of the pivot table.
totalStyleThe name of the cell style for the total cells in the pivot table.
new()Create a new `PivotStyles` object.
PivotStyles$new(parentPivot, themeName = NULL, allowExternalStyles = FALSE)parentPivotThe pivot table that this `PivotStyles` instance belongs to.
themeNameA theme name to represent this collection of styles.
allowExternalStylesDefault `FALSE`, which means this `PivotStyles` object checks that style names specified for styling the different parts of the pivot table must exist in the styles collection. If they do not an error will occur. Specify `TRUE` to disable this check, e.g. if the style definitions are not managed by `pivottabler` but instead in an external system.
isExistingStyle()Check whether a style with the specified style name exists in the collection.
addStyle()Add a new style to the collection of styles.
asCSSRule()Get a style definition in the form of a CSS rule.
pt <- PivotTable$new()
# ...
pivotStyles <- PivotStyles$new(pt, themeName="compact")
pivotStyles$addStyle(styleName="MyNewStyle", list(
font="0.75em arial",
padding="2px",
border="1px solid lightgray",
"vertical-align"="middle",
"text-align"="center",
"font-weight"="bold",
"background-color"="#F2F2F2"
))