Есть ли способ добавить настроенные имена к сообщению об ошибке в R блестящем приложении

Question

С помощью приведенного ниже кода я смог удалить сообщение об ошибке в моем R R приложения. Но есть ли способ добавить настроенное имя к сообщению об ошибке, например «Нет истории покупок»

Ниже приведен код для удаления сообщения об ошибке

tags$head(tags$style(".shiny-output-error{visibility: hidden;}"))

Answer 1

В вашей функции построения графика вы можете поместить что-то вроде этого:

shiny::validate(
            need((nrow(DataSet()) != 0), "No purchase history")
          )

Вы можете иметь столько функций проверки, сколько вам нужно, и сделать их настолько сложными, насколько это необходимо, чтобы помочь пользователю устранить неполадки.

Основано на комментариях ОП:

output$table <- DT::renderDT(

    shiny::validate(
        need(input$Date[2] > input$Date[1], "Invalid Dates"),
        need((nrow(data2()) != 0), "No purchase history")
    )

    datatable(data2())

)