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的最新開發版本,而不是最新的穩定版本。因此我不能保證一切按預期工作。但是,如果有人找到解決方案/解決方法解決此問題,我會感興趣。
謝謝!
非常感謝您的快速回答和附加信息!期待更新。不幸的是,我的代表太小,無法投票答覆。 :-) – alex23lemm
現在快速使用它的方法是在閃亮的代碼中設置'options(rcharts.cdn = TRUE)'。這提供了來自highcharts cdn的js/css資產,它們是最新的。 – Ramnath