lineUI: lineUI: shiny module UI for lineplot

In jsmodule: 'RStudio' Addins and 'Shiny' Modules for Medical Research

lineUI: shiny module UI for lineplot

Description

Shiny module UI for lineplot

Usage

lineUI(id, label = "lineplot")

Arguments

id	id
label	label

Details

Shiny module UI for lineplot

Value

Shiny module UI for lineplot

Examples

library(shiny)
library(ggplot2)
library(ggpubr)
ui <- fluidPage(
  sidebarLayout(
    sidebarPanel(
      lineUI("line")
    ),
    mainPanel(
      optionUI("line"),
      plotOutput("line_plot"),
      ggplotdownUI("line")
    )
  )
)

server <- function(input, output, session) {
  data <- reactive(mtcars)
  data.label <- reactive(jstable::mk.lev(mtcars))

  out_line <- lineServer("line",
    data = data, data_label = data.label,
    data_varStruct = NULL
  )

  output$line_plot <- renderPlot({
    print(out_line())
  })
}

jsmodule documentation built on Oct. 17, 2024, 9:08 a.m.