fullGrid: Add grid elements

In RinteRface/fullPage: Three Families of Functions for Three Different Single Page 'Shiny' Apps

Description

Add rows and columns.

Usage

fullRow(...)

fullColumn(..., width = 6)

pageRow(...)

pageColumn(..., width = 6)

multiRow(...)

multiColumn(..., width = 6)

Arguments

...	any element.
width	Width of column.

Details

Wrap columns in row function, see examples.

Author(s)

John Coene, [e-mail]

Examples

if(interactive()){
  library(shiny)

  ui <- pagePiling(
    center = TRUE,
    sections.color = c("#f3f3f3", "#f4f4f4"),
    pageSection(
      h1("Grid")
    ),
    pageSection(
      h1("Columns"),
      pageRow(
        pageColumn(
          h2("First Column"),
          p("Resize your screen to see columns in action.")
        ),
        pageColumn(
          h2("Second Column"),
          numericInput("obs", "observations", value = 20)
        ),
        pageColumn(
          h2("Thirs Column"),
          plotOutput("plot")
        )
      )
    )
  )

  server <- function(input, output){
    output$plot <- renderPlot({
      par(bg = "#f4f4f4")
      hist(rnorm(input$obs, 10, 3))
    })
  }

  shinyApp(ui, server)
}

RinteRface/fullPage documentation built on Sept. 2, 2021, 2:27 a.m.