a pergunta é direta. Primeiro, tentei uma condição if-else na plotagem de renderização. Algo como

if (input$Next > 0) {
   plot(...)
}
else {
   return()
}

Isso não funcionou. A área cinza na qual a plotagem seria colocada posteriormente foi mostrada, mesmo que a condição ainda não tivesse sido atendida. Em uma próxima etapa, tentei usar validar (consulteaqui) Basicamente, copiei o código do exemplo fornecido. No entanto, ele ainda mostra a área cinza quando a condição não é realmente atendida. Minha tentativa atual é a seguinte:

ui.R

shinyUI(fluidPage(
   sidebarPanel(
      plotOutput("test"),
      actionButton("Next", "Next")
))

server.R

shinyServer(function(input, output, session) {
function(input, output) {
  output$test <- renderPlot({
     validate(
        need(input$Next > 0)
     )
     pt <- plot(input$Next,2)
     print(pt)
  })
}
})

A função plot é apenas para ilustração. O meu parece diferente. Qualquer ajuda é muito apreciada!