R 中的迷你图使用 HTML 小部件

Question

我想尝试在 R 中生成复合迷你图。我认为使用 HTML 小部件可能会有所帮助：

library(htmlwidgets)
library(sparkline)
set.seed(1234)
x = rnorm(10)
y = rnorm(10)
sparkline(x)
sparkline(y)

在这些包使用的 JQuery Sparkline 函数中 (http://omnipotent.net/jquery.sparkline/#s-about) 可以传递参数，例如type='box'。

要传递 composite='true' 选项，需要在链接到 javascript 函数调用者的跨度内设置 class 的 ID。谁能在 R 中做到这一点？关于绘制复合迷你图的任何替代建议？

Answer 1

感谢@timelyportfolio 提出问题和@ramnathv 通过添加复合函数进行更新。

library(htmlwidgets)
library(sparkline)

sl1 <- sparkline(
  c(5,4,5,-2,0,3),
  type="bar",
  barColor="blue",
  chartRangeMin=-5,
  chartRangeMax=10,
  # set an id that will make it easier to refer in the next sparkline
  elementId="sparkline-for-composite"
)

sl2 <- sparkline(
  c(4,1,5,7,9,9,8,7,6,6,4,7,8,4,3,2,2,5,6,7),
  type="line",
  fillColor = FALSE,
  lineColor ="red",
  chartRangeMin = -5,
  chartRangeMax = 10
)    

# add sparkline as a composite
spk_composite(sl1, sl2)

R 中的迷你图使用 HTML 小部件

Sparklines in R using HTML Widgets

javascript

jquery

r

knitr