rCharts и рикша: ползунок исчезает с диаграммы рикши, когда на мою веб-страницу добавляется таблица данных

Я создал веб-страницу, используя замечательные rCharts и Knitr. Моя страница сочетает в себе диаграммы временных рядов рикши с ползунками и таблицей данных. Когда я добавляю таблицу данных, все ползунки исчезают с моих диаграмм рикши. Я попытался изменить config.yml, чтобы не дублировать вызовы одних и тех же ресурсов, но это не решило проблему. Любые идеи будут большой помощью. Ниже приведен воспроизводимый файл r-markdown, который можно связать в html-страницу с помощью Knitr.

```{r echo = F, message = T, cache = F}
require(rCharts)
opts_knit$set(self.contained=T)
knitr::opts_chunk$set(results = 'asis', tidy = F, message = T, echo=F, fig.width=700)
```

### Chart
```{r chart}
# add dummy date column to iris to make a time series chart
x <- cbind(iris, date=seq.Date(as.Date("2010-01-01"), length.out=nrow(iris), by=1))
x$date <- as.double(as.POSIXct(x$date,origin="1970-01-01"))
r2 <- Rickshaw$new()
r2$layer(
  Sepal.Length ~ date,
  data = x,
  type = "line",
  min = "auto"
)
r2$set(
  slider = TRUE,
  title = "IRIS",
  width = 700
)
r2$print('chart', include_assets=T, cdn=T)
```

### Table
```{r table}
r2 <- dTable(iris)
r2$print('table', include_assets=T, cdn=T)
```

person jdl    schedule 06.11.2013    source источник


Ответы (1)


Проблема возникает из-за того, что jQuery включается дважды. Быстрым решением было бы добавить хук документа к knitr, который удалит строку, дублирующую jQuery. Обязательно установите cache = F для этого фрагмента, чтобы он запускался каждый раз, когда вы вызываете knitr. В будущей версии я добавлю аргумент jQuery к print, чтобы вы могли отключить его, если вы уже загрузили jQuery на свою страницу.

```{r cache = F}
library(knitr)
knit_hooks$set(document = function(doc){
  pat = "<script type='text/javascript' src=http://code.jquery.com/jquery-1.10.2.min.js></script>"
  gsub(pat, "", doc)
})
```
person Ramnath    schedule 06.11.2013
comment
Рад, что это помогло. Вы можете принять ответ и закрыть этот вопрос. - person Ramnath; 07.11.2013