2014-01-27 57 views
2

更新至最新Shiny開發版本0.8.0.99似乎對通過rCharts(版本0.4.2)創建的圖表有一些負面影響。特別是,我發現使用Highcharts在我閃亮的應用程序存在以下兩個問題:rCharts與Shiny 0.8.0.99一起使用時顯示有限的功能

  • 工具提示文本不消失,一旦被激活通過徘徊
  • 的X/Y軸的自動比例調節,如果不工作系列已啓用/停用

下面您會發現一個可重複使用的小例子,重複使用他的GitHub page中的Ramanth的Highchart示例。

這是獨立Highchart代碼工作完全正常:

library(rCharts) 

h1 <- Highcharts$new() 
h1$chart(type = "spline") 
h1$series(data = c(1, 3, 2, 4, 5, 4, 6, 2, 3, 5, NA), dashStyle = "longdash") 
h1$series(data = c(NA, 4, 1, 3, 4, 2, 9, 1, 2, 3, 4), dashStyle = "shortdot") 
h1$legend(symbolWidth = 80) 
h1 

您遇到如果您嵌入在一個最小閃亮的應用程序相同的代碼上述問題:

library(shiny) 
library(rCharts) 

runApp(list(
    ui = basicPage(
    h2("Ramnath's GitHub example"), 
    showOutput('myChart', 'highcharts') 
), 
    server = function(input, output) { 
    output$myChart <- renderChart({ 
     h1 <- Highcharts$new() 
     h1$chart(type = "spline") 
     h1$series(data = c(1, 3, 2, 4, 5, 4, 6, 2, 3, 5, NA), dashStyle = "longdash") 
     h1$series(data = c(NA, 4, 1, 3, 4, 2, 9, 1, 2, 3, 4), dashStyle = "shortdot") 
     h1$legend(symbolWidth = 80) 
     # Set dom attribute otherwise chart will not appear on the web page 
     h1$set(dom = 'myChart') 
     h1 
    }) 
    } 
)) 

我知道我已經使用了Shiny的最新開發版本,而不是最新的穩定版本。因此我不能保證一切按預期工作。但是,如果有人找到解決方案/解決方法解決此問題,我會感興趣。

謝謝!

回答

4

它與在Shiny開發版中使用jQuery 1.10.1有關。瞭解詳細信息,請參閱this SO question

我將在本週晚些時候從github的主分支更新highcharts,並且應該解決這個問題。

+0

非常感謝您的快速回答和附加信息!期待更新。不幸的是,我的代表太小,無法投票答覆。 :-) – alex23lemm

+1

現在快速使用它的方法是在閃亮的代碼中設置'options(rcharts.cdn = TRUE)'。這提供了來自highcharts cdn的js/css資產,它們是最新的。 – Ramnath

相關問題