Mac上的进度条

Question

我有一个关于R中进度条的问题，它显示为一个弹出窗口。 我们在Windows和Mac操作系统上使用Shiny本地进行开发阶段。我们希望使用进度条作为弹出消息，因为这更容易在Shiny上显示。现在，为了查看Windows中的进度条，您可以执行以下操作：

pb <- winProgressBar("test progress bar", "Some information in %",
                 0, 100, 50)

u <- c(0, sort(runif(20, 0 ,100)), 100)
for(i in u) {
Sys.sleep(0.1)
info <- sprintf("%d%% done", round(i))
setWinProgressBar(pb, i, sprintf("test (%s)", info), info)
}
Sys.sleep(5)
close(pb)

好消息是，Shiny还会将此弹出窗口推送到您的屏幕。我们想在Mac上做类似的事情，这些线路不适用于IOS。

是否有人建议为Mac用户启用此功能，即获取Mac的进度条的其他软件包或创意。