按《Javascript for R》制作HTML Widget时标签转义问题求助

背景 #

按照《Javascript for R》相关章节操作时，无法复现最后一个示例，推测核心问题是HTML标签的<和>被转义为<和>，导致HTML结构无法正常解析渲染。

复现步骤 #

所需依赖包 #

library(usethis)
library(htmlwidgets)
library(shiny)

创建Widget项目 #

create_package("playground")
scaffoldWidget("play")

修改play.R代码 #

将原代码片段：

# forward options using x
  x = list(
      message = message
  )

替换为：

# forward options using x
  x = list(
      message = as.character(message)
  )

加载包并调用Widget #

document(); load_all()
play(h2("Some text!"))

实际结果 #

检查页面元素发现，Widget容器的HTML内容为：

<div class="play html-widget html-fill-item-overflow-hidden html-fill-item html-widget-static-bound" id="htmlwidget-4a78c11ab194f4375219" style="width:960px;height:500px;">&lt;h2&gt;qwer&lt;/h2&gt;</div>

预期效果 #

将输入的h2("Some text!")渲染为格式正确的二级标题，而非显示转义后的纯文本。

疑问点 #

• 转义操作发生的具体环节（是R端传递数据时自动转义？还是JavaScript渲染阶段的问题？）
• 这种HTML转义是否属于htmlwidgets包的预期行为？
• 书籍撰写完成后，htmlwidgets或相关工具的机制是否发生了变更？

附当前使用的play.js代码：

HTMLWidgets.widget({

  name: 'play',

  type: 'output',

  factory: function(el, width, height) {

    // TODO: define shared variables for this instance

    return {

      renderValue: function(x) {

        // TODO: code to render the widget, e.g.
        el.innerText = x.message;

      },

      resize: function(width, height) {

        // TODO: code to re-render the widget with a new size

      }

    };
  }
});

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