非包结构下如何使用flow包的flow_view_deps()函数？

问题根源 #

flow_view_deps()是为R包场景设计的，默认会查找项目根目录的DESCRIPTION文件，非包结构下直接调用会触发缺失文件的错误；而flow_view_uses()仅支持单函数分析，无法直接生成全局依赖关系。

可行解决方案 #

方案1：自定义逻辑整合单函数依赖生成全局图 #

通过收集全局环境中的自定义函数，遍历调用flow_view_uses()获取每个函数的依赖，再用可视化工具生成完整依赖图：

library(flow)
library(igraph)

# 筛选全局环境中的自定义函数（排除系统/包自带函数）
custom_functions <- Filter(is.function, mget(ls(.GlobalEnv)))
fun_names <- names(custom_functions)

# 构建依赖关系边表
dependency_edges <- data.frame(from = character(), to = character())
for (name in fun_names) {
  # 获取当前函数调用的其他自定义函数
  fun_uses <- flow_view_uses(name, show_imports = FALSE, show_exports = FALSE)
  # 只保留属于自定义函数集合的依赖
  matched_deps <- intersect(names(fun_uses$calls), fun_names)
  if (length(matched_deps) > 0) {
    dependency_edges <- rbind(dependency_edges, 
                              data.frame(from = rep(name, length(matched_deps)), to = matched_deps))
  }
}

# 生成并可视化依赖图
if (nrow(dependency_edges) > 0) {
  dep_graph <- graph_from_data_frame(dependency_edges, directed = TRUE, vertices = fun_names)
  plot(dep_graph, edge.arrow.size = 0.5, vertex.label.cex = 0.8, main = "自定义函数依赖关系")
} else {
  message("未检测到函数间依赖")
}

方案2：临时创建空DESCRIPTION文件绕过校验 #

在项目工作目录临时生成空的DESCRIPTION文件，让flow_view_deps()误以为是包结构，再指定要分析的函数：

# 在工作目录创建空DESCRIPTION
file.create("DESCRIPTION")
# 指定要分析的函数集合
flow_view_deps(c("foo", "bar"), package = ".")
# 可选：用完后删除临时文件
file.remove("DESCRIPTION")

注意：此方法属于临时绕过，可能因flow包的包逻辑校验出现识别问题，仅作为应急方案。

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