kartsim_shiny_output: Shiny Widget Output

In javierluraschi/hexkart: kartsim: Kart simulation for model training

Description

Provides a Shiny Widget for Output.

Usage

kartsim_shiny_output(outputId, width = "100%", height = "100%")

Arguments

outputId	The identifier for this widget.
width	The width for this widget.
height	The height for this widget.

Examples

library(shiny)

ui <- fluidPage(
  tags$head(
    tags$style(HTML("
      #kartsim {
        height: 270px !important;
        margin-top: 10px;
      }
    "))
  ),
  kartsim_shiny_output("kartsim"),
  textOutput("direction")
)

server <- function(input, output) {
kartsim_shiny_render(
  kartsim_play(size)
)

observeEvent(input$done, {
  input$direction <- input$direction
})
}

if (interactive()) {
  shinyApp(ui = ui, server = server)
}

javierluraschi/hexkart documentation built on May 6, 2019, 8:33 p.m.