Hi all,
Apologies if this question was previously answered, but I am a shiny new-bie! 
I am using a shiny.app to sync a plot and a table display of a single record from a dataset in the global environment. I tried this:
# Define server logic ----
server <- function(input, output) {
RecordPointer <- 1
observeEvent(input$Next, {
RecordPointer <- RecordPointer+1
})
observeEvent(input$Prev, {
if(RecordPointer > 2) RecordPointer <- RecordPointer - 1
})
output$table <- DT::renderDataTable(DT::datatable(Discordant[RecordPointer,],
options = list(pageLength = 1))
)
output$plot <- renderPlot({
i <- RecordPointer
})
[snip]
}
but the record displayed and plotted stays the same no matter how many times I hit next or prev...
I will greatly appreciate any hint that helps me see the error in my ways!
Alternatively, I will also appreciate if someone can help me how to access the "current" record in the DT, that way I will not have to construct my own navigator.
Thanks!!!
Jose