2016-02-26 46 views
0

我在一个Shiny App中使用了2个R图。我观察到一个返回图的问题,也就是说,它有时不会加载/显示其中一个dygraph,有时它会。奇怪的行为。任何人都有类似经历吗我该如何稳定地显示一个闪亮的多个dygraphs?

上下文:

UI

library(zoo) 
library(dygraphs) 

... 
tabName="time", 
    fluidRow(
    tabBox(width = 350, 
      tabPanel(title="Product", dygraphOutput("dygraph1")), 
      tabPanel(title="Segment", dygraphOutput("dygraph2")) 
... 

服务器

}) 

    zoo<-structure(c(2252L, 2256L, 2256L, 2257L, 2259L, 2262L, 2262L, 
       2262L, 765L, 767L, 767L, 769L, 768L, 769L, 774L, 706L, 
       16239L, 16220L, 26184L, 26148L, 26091L, 26099L, 26118L, 
       12607L), .Dim = c(8L, 3L), .Dimnames = list(NULL, c("A", 
       "B", "C")), index = structure(c(16849, 16853, 16854, 
       16855, 16856, 16857, 16858, 16859), class = "Date"), class =  
       "zoo") 

    zoo2<-structure(c(52L, 56L, 56L, 57L, 59L, 62L, 62L, 
       62L, 65L, 67L, 67L, 69L, 68L, 69L, 74L, 76L, 
       162L, 162L, 261L, 261L, 260L, 260L, 261L, 
       126L), .Dim = c(8L, 3L), .Dimnames = list(NULL, c("D", "E",    
       "F")), index = structure(c(16849, 16853, 16854,16855, 
       16856, 16857, 16858, 16859), class = "Date"), class = "zoo") 

    output$dygraph1<-renderDygraph({ 
    dygraph(zoo)%>% 
    dyOptions(stackedGraph = TRUE, drawGrid = FALSE) %>% 
    dyRangeSelector(height = 20)%>% 
    dyHighlight(highlightSeriesOpts = list(strokeWidth = 3)) 

    }) 

    output$dygraph2<-renderDygraph({ 
    dygraph(zoo2) %>% 
    dyOptions(stackedGraph = TRUE,drawGrid = FALSE) %>% 
    dyRangeSelector(height = 20) %>% 
    dyHighlight(highlightSeriesOpts = list(strokeWidth = 3)) 

    }) 

我运行v Studio版本0.99.484,R诉3.2.3,Windows机器上,Dygraphs包诉。 0.7

+0

请让它更具可重复性。我不得不组成自己的数据集'zoo'和'zoo2',我没有问题。你的dygraph是否显示一些错误信息? –

+0

@ K.Rohde,我添加了动物园的输入。希望这将足以解决问题。我发现这种行为的更多来源... https://github.com/rstudio/dygraphs/issues/62。对于某些人来说,解决方案是为每个情节提供单独的图表输出调用,但是我已经得到了这些调用。有任何想法吗? –

+0

我仍然无法重现您提到的奇怪行为。不好意思问,但是你是否在最新版本上运行R和你的软件包? –

回答

1

所以,从RDygraphs对GitHub的支持(Issue Closed @https://github.com/rstudio/dygraphs/issues/62)这些问题ems并不罕见。该解决方案包括所有依赖包到最新版本的更新,在我的案例中,htmlwidgets为0.6版。现在,dygraph正确显示98%(2%出错,应该可能在几天内通过新版本的htmlwidgets解决)。