rtables (version 0.4.0)

indent: Change indentation of all rrows in an rtable

Description

Change indentation of all rrows in an rtable

Usage

indent(x, by = 1)

Arguments

x

rtable object

by

integer to increase indentation of rows. Can be negative. If final indentation is smaller than 0 then the indentation is set to 0.

Value

x with its indent modifier incremented by by.

Examples

# NOT RUN {
is_setosa <- iris$Species == "setosa"
mtbl <- rtable(
  header = rheader(
    rrow(row.name = NULL, rcell("Sepal.Length", colspan = 2), rcell("Petal.Length", colspan=2)),
    rrow(NULL, "mean", "median", "mean", "median")
  ),
  rrow(
    row.name = "All Species",
    mean(iris$Sepal.Length), median(iris$Sepal.Length),
    mean(iris$Petal.Length), median(iris$Petal.Length),
    format = "xx.xx"
  ),
  rrow(
    row.name = "Setosa",
    mean(iris$Sepal.Length[is_setosa]), median(iris$Sepal.Length[is_setosa]),
    mean(iris$Petal.Length[is_setosa]), median(iris$Petal.Length[is_setosa]),
    format = "xx.xx"
  )
)
indent(mtbl)
indent(mtbl, 2)

# }