r - 在 Shiny App 中训练模型时显示加载标志

Question

我正在制作一个 Shiny 应用程序，在其中单击 actionButton 时，将使用 caret 包训练模型。由于此训练需要时间 - 大约 4-5 分钟 - 我想在应用程序中显示加载标志或加载 GIF，在模型训练后显示结果。否则，用户将不知道发生了什么或模型何时被训练。

谢谢

Answer 1

您可以在 ui.R 中使用加载微调器

# loading the library
library(shinycssloaders)
withSpinner()

# For example, if you have the plot for which you would like to show loading spinner before it's gets drawn while making some data manipulation 
withSpinner(plotOutput("my_plot")) 

您可以在 https://cran.r-project.org/web/packages/shinycssloaders/README.html 上找到有关它的更多信息。