在R语言中使用Plotly：如何引用与提取图形数值？

一、直接获取原始输入参数 #

你定义桑基图时传入的节点、链接等原始参数，可直接通过Plotly对象的x$data字段访问：

# 获取节点标签
fig$x$data[[1]]$node$label
# 获取链接的流量数值
fig$x$data[[1]]$link$value
# 获取节点颜色配置
fig$x$data[[1]]$node$color

二、获取渲染后动态计算的数值（如节点x坐标） #

你在RStudio View(fig)中看到的attrs下的数值（比如节点坐标），是Plotly渲染时动态生成的，不会直接存储在R对象中，可通过以下两种方式提取：

方法1：导出静态JSON解析 #

使用plotly_json()将图形转换为包含所有渲染后数据的JSON，再用jsonlite解析提取：

library(jsonlite)
# 导出图形的完整JSON数据（FALSE表示不打开浏览器）
fig_json <- plotly_json(fig, FALSE)
# 解析JSON为R列表
fig_parsed <- fromJSON(fig_json)
# 提取节点x坐标
fig_parsed$x$visdat[[1]]$attrs$node$x

注意：visdat中的元素是静态列表，无需调用函数，直接索引即可——plotly_json()已经把延迟计算的结果静态化导出。

方法2：前端JS实时提取 #

如果需要在交互过程中实时获取数值，可通过htmlwidgets::onRender()注入JavaScript代码，在前端层面访问渲染后的完整数据：

library(htmlwidgets)
fig <- fig %>% onRender("
  function(el, x) {
    // 获取桑基图的节点计算数据
    var nodeCoords = x.data[0].node.x;
    // 在浏览器控制台打印结果（可通过浏览器开发者工具查看）
    console.log('节点x坐标：', nodeCoords);
    // 若需传递回R，可使用Shiny的消息机制（需结合Shiny环境）
  }
")
fig

三、常见问题说明 #

• RStudio View()复制的路径无效，是因为.是临时环境中的对象，控制台没有对应的上下文，无法直接使用。
• fig$x$visdat下带随机字符串的元素是延迟计算函数，直接调用()无法获取完整attrs，因为它依赖渲染环境的上下文。

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