У меня следующая проблема. Мое блестящее приложение в основном выполняет следующие действия на стороне сервера после нажатия кнопки:
observe({
isolate({
## Here are a lots of computations with the results shown iteratively using invalidateLater():
})
if( computations not done ){
invalidateLater(500)
} else {
#Once the computations are done, I create a final output table and also a image.
output$example <- renderTable( something based on the computations )
output$example2 <- renderPlot( something based on the computations )
#Here comes code to save the results of the computation in a database
})
Вот моя проблема: сохранение в базе данных занимает около 3 секунд. Это не конец света, но моя проблема в том, что окончательный результат отображается только после сохранение завершено.
Я хотел бы изменить это, то есть я Хотелось бы сначала визуализировать вывод (который на самом деле не занимает много времени, может быть, полсекунды). Я пробовал разные вещи, такие как помещение кода сохранения в другой блок наблюдения и / или изоляции, но я не смог этого сделать. Есть ли способ сделать это?