| grVizOutput {DiagrammeR} | R Documentation |
Widget output function for use in Shiny
grVizOutput(outputId, width = "100%", height = "400px")
outputId |
output variable to read from |
width |
a valid CSS unit for the width or a number, which will be
coerced to a string and have |
height |
a valid CSS unit for the height or a number, which will be
coerced to a string and have |
## Not run:
library(shiny)
library(shinyAce)
ui = shinyUI(fluidPage(fluidRow(
column(
width=4
, aceEditor("ace", selectionId = "selection", value="digraph {A;}")
),
column(
width = 6
, grVizOutput('diagram' )
)
)))
server = function(input, output) {
output$diagram <- renderGrViz({
grViz(
input$ace
)
})
}
shinyApp(ui = ui, server = server)
## End(Not run)