如何在R中使用pryr包获取自定义函数内部调用的层级结构？

你调用parse(text = plt_test_df())时，plt_test_df()会直接执行函数并返回ggplot绘图对象，parse接收的实际是该对象的打印文本而非可解析的函数代码，因此触发解析错误。

如果要分析目标函数的静态调用结构，不需要把函数代码转成文本再解析，直接提取函数体传入call_tree即可：

trace_func_depth <- capture.output(pryr::call_tree(body(plt_test_df)))
trace_func_depth

pryr的call_tree仅能解析当前传入的函数体的单层表达式结构，不会自动递归展开内部调用的其他自定义函数，只能显示被调用的自定义函数名，无法展示其内部调用层级。

静态分析方案 #

使用flow包可生成自定义函数的完整调用层级结构，支持自动递归展开所有内部调用的自定义函数，同时支持可视化流程图输出：

# 安装加载包
# install.packages("flow")
library(flow)

# 直接生成函数调用层级视图，默认会展开所有自定义函数的内部结构
flow_view(plt_test_df)

如果需要文本形式的调用树，可配合codetools包自行实现递归逻辑：先通过findGlobals提取当前函数调用的所有函数，过滤出用户自定义函数后再逐层解析其函数体即可。

动态追踪方案 #

如果函数内部存在分支判断逻辑，静态分析无法覆盖实际运行时的调用路径，可以使用动态追踪工具：

• 用utils::Rprof运行函数后生成调用栈日志，解析后可得到实际运行时的完整调用层级
• 用profvis包可直接生成可视化的动态调用火焰图，清晰展示所有层级的调用关系和耗时。

内容的提问来源于stack exchange，提问作者ViSa