## Not run:
# shinyUI(bootstrapPage(
#
# gridster(tile.width = 200, tile.height = 200,
# gridsterItem(col = 1, row = 1, size.x = 1, size.y = 1,
# sliderInput("n", "Input value:", min = 0, max = 50, value = 10)
# ),
# gridsterItem(col = 2, row = 1, size.x = 1, size.y = 1,
# textOutput("myText")
# ),
# gridsterItem(col = 1, row = 2, size.x = 2, size.y = 1,
# plotOutput("myPlot", height = 200)
# )
# )
# )
# ## End(Not run)
Run the code above in your browser using DataLab