histogramServer | R Documentation |
Shiny module server for histogram.
histogramServer(
id,
data,
data_label,
data_varStruct = NULL,
nfactor.limit = 10
)
id |
id |
data |
Reactive data |
data_label |
Reactive data label |
data_varStruct |
Reactive List of variable structure, Default: NULL |
nfactor.limit |
nlevels limit in factor variable, Default: 10 |
Shiny module server for histogram.
Shiny module server for histogram.
library(shiny)
library(ggplot2)
library(ggpubr)
ui <- fluidPage(
sidebarLayout(
sidebarPanel(
histogramUI("histogram")
),
mainPanel(
plotOutput("histogram"),
ggplotdownUI("histogram")
)
)
)
server <- function(input, output, session) {
data <- reactive(mtcars)
data.label <- reactive(jstable::mk.lev(mtcars))
out_histogram <- histogramServer("histogram",
data = data, data_label = data.label,
data_varStruct = NULL
)
output$histogram <- renderPlot({
print(out_histogram())
})
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.