Use plot as background

Use a reactive plot as section or slide background.

fullSectionPlot(
  outputId,
  ...,
  menu = NULL,
  center = FALSE,
  background = "rgba(255,255,255,0.5)"
)

fullSlidePlot(
  outputId,
  ...,
  menu = NULL,
  center = FALSE,
  background = "rgba(255,255,255,0.5)"
)

pageSectionPlot(
  outputId,
  ...,
  menu = NULL,
  center = FALSE,
  background = "rgba(255,255,255,0.5)"
)

multiSectionPlot(
  outputId,
  ...,
  menu = NULL,
  center = FALSE,
  background = "rgba(255,255,255,0.5)"
)

Arguments

outputId	id passed to plotOutput.
...	any children element.
menu	menu link.
center	whether to center text horizontally.
background	sets background to overlaying shiny inputs, set to NULL to remove.

Examples

if(interactive()){

library(shiny)

ui <- fullPage(
  opts = list(sectionsColor = c('#4BBFC3', '#7BAABE')),
  fullSection(h1("Full section plots"), center = TRUE),
  fullSectionPlot(
    "myPlot2",
    center = TRUE,
    fullContainer(
      h2("With a title")
    )
  ),
  fullSectionPlot(
    "myPlot",
    center = TRUE,
    fullContainer(
      h3("Layer anything you want"),
      selectInput(
        "select",
        "Choose y",
        choices = c("mpg", "drat", "wt")
      )
    )
  )
)

server <- function(input, output){

  output$myPlot <- renderPlot({
    plot(1:nrow(mtcars), mtcars[[input$select]])
  })

  output$myPlot2 <- renderPlot({
    plot(1:nrow(mtcars), mtcars[[input$select]])
  })

}

shinyApp(ui, server)
}