R 写日志

我想从我的闪亮应用程序（在服务器上运行）保存回溯。我尝试使用shiny.error（）提取StackTrace（），但回溯最有价值的部分被截断，可能是由于第二次调用captureStackTraces（）

雷普雷克斯

library(shiny)

options(shiny.fullstacktrace = TRUE, shiny.error = function() {
    stack_list <- extractStackTrace(sys.calls())
    print(stack_list)
})

ui <- fluidPage(
    actionButton("action", label = "Action")
)

server <- function(input, output) {
    observeEvent(input$action,{
        sum(3,"g")
    })
}

shinyApp(ui = ui, server = server)

库（闪亮）
选项（shinny.fullstacktrace=TRUE，shinny.error=function（）{
堆栈列表我认为这是一个很好的问题，因为调试
Shining
并不是那么容易。不幸的是，我不确定这是否可能（如果能找到解决方案就太好了）。请注意
extractStackTrace
。基本上使用
cat
谢谢！不幸的是，我不能使用
cat（）
因为我想在出现意外错误后保存跟踪输出。由内部函数
printError（）
打印到RStudio控制台的回溯非常适合我。但我不明白我应该向其提供参数以将此回溯保存在日志文件中。