Question

这种闪亮的Highcharts功能闪亮

h1 <- Highcharts$new()
h1$series(data = test$sites, type="column",name = "Sites Actifs",enabled=T)
h1$series(data = test$alerte, type="column",name = "Sites Alerte")
h1$series(data = test$ID, type="area",name = "CAID", enabled=F)
h1$series(data = test$LD, type="area",name = "MILD")
h1$series(data = test$rat, type="line", name = "Percentile")
h1$series(data = test$epi, type="line", name = "Outbreak")
h1$series(data = test$Temp,  type='line', name = "Temperatures")
h1$series(data = test$ND, type = "line", name = "NDVI")
h1$series(data = test$Pm, type="line",name = "Pmm",enabled=T)
h1$colors('rgba(187, 165, 203, 0.9)', 'rgba(187, 40, 175,0.9)','rgba(255,179,128,.9)','rgba(0,0,128,.4)','rgba(170,0,0, .9)', 'rgba(0,0,0, .9)', 'rgba(243,170,80, .9)','rgba(120,193,102, .9)','rgba(85,153,255,.9)')
h1$legend(symbolWidth = 30)
h1$plotOptions(line=list(marker=list(enabled = F)),area=list(marker=list(enabled = F)))
h1$chart(zoomType = "x1")
h1$exporting(enabled = T)
h1$params$width <- 500
h1$params$height <- 700
h1$xAxis(type='datetime', categories=ref_time, tickInterval = 30)
return(h1)

但是当我隐藏一些变量（即$ sites，$ alerte，$ Temp）以测试某些假设时，如果我更新另一个变量（即$ rat），则所有图形都会更新，隐藏变量将被取消隐藏。

您是否有解决此问题的解决方案＆＃34;

由于

Answer 1

我也不确定我理解你的问题，但是你说你在闪亮的应用程序中定义了几个复选框，允许你隐藏/显示一个特定的系列，你需要做的就是使用可见选项，例如

h1$series(data = test$ND, type = "line", name = "NDVI", visible=input$show.NDVI)

每次更改复选框时，仍会生成绘图，但隐藏的系列将保持不变。另一个选择可能是不首先添加系列，例如

if(input$show.NDVI){ h1$series(data = test$ND, type = "line", name = "NDVI", visible=input$show.NDVI) }

Rcharts Shiny：在一次变量更新后不重新加载所有变量

1 个答案: