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

Question

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

Answer 1

这里是一个简短的例子(关键是指定你想要调查的环境):

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))
        }))
      )
    })
  }
))