Insert condition to show daterange in shiny code

[nirgrahamuk]

@JojoSouza

  output$daterange <- renderUI({
    req(data())
    dateRangeInput("daterange1", "Period you want to see:",
                   start = min(data()$date2),
                   end   = max(data()$date2))
  })

relating back to the 'old' thread. this data()$date2 should be otherdata()$date2 once you have written the code for populating otherdata correctly