apexcharter-shiny-facets | R Documentation |
Output and render functions for using apexcharter faceting within Shiny applications and interactive Rmd documents.
apexfacetOutput(outputId)
renderApexfacet(expr, env = parent.frame(), quoted = FALSE)
outputId |
output variable to read from |
expr |
An expression that generates a apexcharter facet with |
env |
The environment in which to evaluate |
quoted |
Is |
An Apexcharts output that can be included in the application UI.
ax_facet_wrap()
, ax_facet_grid()
library(shiny)
library(apexcharter)
data("unhcr_ts")
refugees <- unhcr_ts %>%
subset(
population_type == "Refugees (incl. refugee-like situations)"
) %>%
transform(date = as.Date(paste0(year, "-01-01")))
ui <- fluidPage(
tags$h2("Apexcharts Facets Example"),
apexfacetOutput("myfacet")
)
server <- function(input, output, session) {
output$myfacet <- renderApexfacet({
apex(refugees, aes(date, n), type = "column") %>%
ax_yaxis(tickAmount = 5) %>%
ax_facet_wrap(
vars(continent_origin),
scales = "free"
)
})
}
if (interactive())
shinyApp(ui, server)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.