withr · August 29, 2015 13:57
diff --git a/server.R b/server.R
 shinyServer(function(input, output) {
  observe({
    print(input$daterange)
    })
 })
diff --git a/ui.R b/ui.R
 shinyUI(bootstrapPage(
  dateRangeInput("daterange", "Date Range",
                 start = "2013-01-01", 
                 end = "2013-09-05")
 ))
	shinyServer(function(input, output) {
	observe({
	print(input$daterange)
	})
	})
	shinyUI(bootstrapPage(
	dateRangeInput("daterange", "Date Range",
	start = "2013-01-01",
	end = "2013-09-05")
	))