В моем приложении rshiny я хочу записывать журнал в пользовательский интерфейс на каждом шаге, чтобы увидеть прогресс.Мой текущий код выглядит примерно так.output$msg - это verbatimTextOutput элемент управления.
msg<-"Started\n"
output$msg <- renderText({ msg })
msg<-paste(msg,"Get data\n")
output$msg <- renderText({msg})
Проблема в том, что msg появляется на странице только после выполнения всего кода.Я хочу, чтобы msg появлялся одновременно с выполнением.
Выполнение кода занимает некоторое время, поэтому помогает увидеть прогресс