rCharts NVD3多芯堆叠钢筋？

我想知道是否有可能在rCharts/NVD3或类似产品的多曲线图中结合一条线进行堆叠条形图

一个小示例（从rCharts on的演示部分复制）可能如下所示：

library(dplyr)
library(tidyr)
library(data.table)
library(rCharts)

data(economics, package = 'ggplot2')

ecm <- reshape2::melt(economics[,c('date', 'uempmed', 'psavert', 'unemploy')], id = 'date')

p12 <- nPlot(value ~ date, group = 'variable', data = ecm, type = 'multiChart')
p12$params$multi = list(
  uempmed = list(type="bar",yAxis=1),
  psavert = list(type="bar",yAxis=1),
  unemploy = list(type="line",yAxis=2)
)
p12$setTemplate(script = system.file(
  "/libraries/nvd3/layouts/multiChart.html",
  package = "rCharts"
))
p12

库（dplyr）
图书馆（tidyr）
库（数据表）
图书馆（艺术）
数据（经济学，数据包='ggplot2'）
电解加工