<p>使用r2d3包，我可以在RMarkdown中渲染一个简单的d3.js图表，像这样：</p> <p><strong>barchart.js</strong>：</p> <pre class="brush:php;toolbar:false;">// !preview r2d3 data=c(0.3, 0.6, 0.8, 0.95, 0.40, 0.20) var barHeight = Math.floor(height / data.length); svg .selectAll(&quot;rect&quot;) .data(data) .enter() .append(&quot;rect&quot;) .attr(&quot;width&quot;, function (d) { return d * width; }) .attr(&quot;height&quot;, barHeight) .attr(&quot;y&quot;, function (d, i) { return i * barHeight; }) .attr(&quot;fill&quot;, &quot;steelblue&quot;);</pre> <p><strong>RMarkdown</strong>：</p> <pre class="brush:php;toolbar:false;">{r out.width='100%', fig.height=4} library(r2d3) r2d3(data=c(0.3, 0.6, 0.8, 0.95, 0.40, 0.20), script = &quot;barchart.js&quot;)</pre> <p>但是，假设我想要在RMarkdown中同时绘制相同的图表（即两个图表并排）。有办法做到这一点吗？使用简单的RMarkdown很容易，因为你可以保存图形然后在网格中排列。但是r2d3有办法做到这一点吗？它不会将每个图形保存为可以在网格中排列的对象。</p>

library(r2d3)
library(crosstalk)

crosstalk::bscols(
  widths = c(6, 6),
   r2d3(data=c(0.3, 0.6, 0.8, 0.95, 0.40, 0.20), script = "barchart.js", 
        width = 300, height = 200),
   r2d3(data=c(0.3, 0.6, 0.8, 0.95, 0.40, 0.20), script = "barchart.js", 
        width = 300, height = 200)
)