rtables (version 0.4.0)

Viewer: Dispaly an rtable object in the Viewer pane in RStudio or in a browser

Description

The table will be displayed using the bootstrap styling for tables.

Usage

Viewer(x, y = NULL, row.names.bold = FALSE, ...)

Arguments

x

object of class rtable or shiny.tag (defined in htmltools)

y

optional second argument of same type as x

row.names.bold

row.names.bold boolean, make rownames bold

...

arguments passed to as_html

Value

not meaningful. Called for the side effect of opening a browser or viewer pane.

Examples

# NOT RUN {
if(interactive()) {
sl5 <- factor(iris$Sepal.Length > 5, levels = c(TRUE, FALSE),
   labels = c("S.L > 5", "S.L <= 5"))

df <- cbind(iris, sl5 = sl5)

tbl <- basic_table() %>%
   split_cols_by("sl5") %>%
   analyze("Sepal.Length") %>%
   build_table(df)

Viewer(tbl)
Viewer(tbl, tbl)


tbl2 <-htmltools::tags$div(
  class = "table-responsive",
  as_html(tbl, class_table = "table")
)

Viewer(tbl, tbl2)

}
# }