列出 R 闪亮服务器上应用程序中的对象内存使用情况

我一直在尝试显示在 R Shiny Server 上运行时 R Shiny 应用程序中使用的每个对象的内存使用情况，以便识别内存泄漏。在 R 中，我可以调用ls() or objects()并获取所有这些信息。一旦我尝试在闪亮的应用程序中显示此信息，无论是通过renderText() or renderDataTable()脱离数据框，一切都是空白的。我猜功能环境有问题ls() and objects()正在查看。以前有人遇到过这个问题吗？

这是一个简短的示例（关键是指定您要调查的环境）：

library(shiny)
runApp(list(
  ui = fluidPage(
    tableOutput('foo')
  ),
  server = function(input, output) {
    x1 <- 1:100
    x2 <- rbind(mtcars, mtcars)
    env <- environment()  # can use globalenv(), parent.frame(), etc
    output$foo <- renderTable({
      data.frame(
        object = ls(env),
        size = unlist(lapply(ls(env), function(x) {
          object.size(get(x, envir = env, inherits = FALSE))
        }))
      )
    })
  }
))