блестящее приложение: отключить кнопку загрузки

Мое блестящее приложение производит некоторые файлы, которые пользователь может загрузить. Для этого я поместил кнопку загрузки в пользовательский интерфейс. Тем не менее, когда страница запускается и до того, как будет выполнен какой-либо расчет, загружать нечего. Я хочу запретить пользователю скачивать пустые страницы.

Для этого я думаю отключить кнопку download до того, как вывод будет готов. Но я не знаю, как это сделать. Я нашел способы отключить ActionButton (например, пакет ShinyBS и другие коды JS), но ничего для downloadButton.

Прямо сейчас я использую validate () для выдачи ошибок, если вывод не готов. Однако при нажатии кнопки downloadButton открывается новая пустая веб-страница с сообщением об ошибке, которое выглядит ужасно.

дайте мне знать, что вы думаете.

Это мой код пользовательского интерфейса

 downloadButton('download', 'Download Lasso component matrix')),

и это мой код сервера:

  output$download_matrix <- downloadHandler(
      filename = function() { 
      validate(
      need(is.null(outputData())==FALSE, "No data to download yet")
      )
      paste('combined_model_matrix', '.txt', sep='') },
    content = function(file) {
      write.csv(outputData()$combinedAdjMtr, file)
})