setHistoVisibility | R Documentation |
Tells which columns have to be displayed with histograms.
setHistoVisibility(id, histoVisibility)
id |
output variable to read from (id which references the requested plot) |
histoVisibility |
Vector of boolean (one for each data column), |
No return value, called from shiny applications for side effects.
if(interactive() && require(shiny)) {
library(shiny)
library(parallelPlot)
ui <- fluidPage(
checkboxInput("histCB", "Histogram Visibility", FALSE),
p("The check box controls the visibility of histograms"),
parallelPlotOutput("parPlot")
)
server <- function(input, output, session) {
output$parPlot <- renderParallelPlot({
parallelPlot(iris)
})
observeEvent(input$histCB, {
histoVisibility <- rep(input$histCB, ncol(iris))
parallelPlot::setHistoVisibility("parPlot", histoVisibility)
})
}
shinyApp(ui, server)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.