如何将grViz()输出转换为DiagrammeR原生dgr_graph格式？

1. 提取grViz对象中的DOT代码 #

grViz对象内部存储了生成图的DOT源代码，可通过x$diagram直接提取：

library(DiagrammeR)

# 示例grViz对象
g <- grViz("digraph 'foodweb' {\n  \"h()\" -> { \"f()\", \"g()\" }\n  \"f()\"\n  \"g()\" -> { \"f()\" }\n}")

# 提取DOT代码
dot_code <- g$x$diagram

2. 转换为dgr_graph对象 #

使用DiagrammeR原生的dot_to_dgr_graph()函数，将提取的DOT代码转换为dgr_graph格式：

# 格式转换
dgr_graph_obj <- dot_to_dgr_graph(dot_code)

# 验证对象类型
class(dgr_graph_obj)
# [1] "dgr_graph"

3. 导出可自由移动节点的交互式图 #

转成dgr_graph后，可通过render_graph()生成支持节点拖拽、箭头自动跟随的交互式图，也可导出为HTML文件离线使用：

# 在RStudio/浏览器中直接渲染交互式图（支持拖拽）
render_graph(dgr_graph_obj, layout = "tree") # 可根据图结构选择合适布局

# 导出为HTML文件
export_graph(
  dgr_graph_obj,
  file_name = "interactive_foodweb.html",
  file_type = "html"
)

针对foodwebr包生成的图 #

如果是foodwebr生成的grViz对象，流程完全一致：

library(foodwebr)

# 假设foodwebr生成的grViz对象为fw_graph
fw_graph <- foodwebr::generate_function_graph() # 替换为实际生成图的函数

# 提取DOT代码并转换
fw_dot <- fw_graph$x$diagram
fw_dgr <- dot_to_dgr_graph(fw_dot)

# 生成/导出交互式图
render_graph(fw_dgr)

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