如何分析R6类函数？

Question

R6类函数是匿名的，因此分析信息会丢失。例如：

library(R6)
library(proftools)

Test <- R6Class("Test",
  public = list(
    fn = function() pause(0.3)
  )
)
obj <- Test$new()

#
# Profile
Rprof(line.profiling=TRUE)
replicate(10, obj$fn())
Rprof(NULL)
png('profile-self.png')
plotProfileCallGraph(readProfileData(), score='self')
dev.off()

提供以下配置文件信息：

​

​

如何有效地分析这些功能？

Answer 1

如果您使用的是R-devel的最新版本(从this commit开始)，它将在分析数据中输出obj$fn而不是<Anonymous>。这应该在R (3.3.0?)的下一个版本中。