闪亮：未选中复选框时，xts 图（xtsExtra）消失
Posted
技术标签:
【中文标题】闪亮：未选中复选框时，xts 图（xtsExtra）消失【英文标题】：Shiny: xts plot (xtsExtra) disappears when checkbox unchecked 【发布时间】：2015-01-28 14:52:01 【问题描述】：我正在 rmarkdown 上编写一个闪亮的应用程序。该应用程序假设在同一个图表上绘制两个时间序列，但第二个图是以复选框为条件的。
问题是，当复选框未选中时，整个图表都会消失，而不仅仅是与复选框相关的系列。
我目前正在使用来自 xtsExtra pkg 的 plot.xts，但我愿意尝试其他 pkg。唯一的限制是必须自定义颜色 (col) 和线宽 (lwd)。
---
title: "Untitled"
author: "gustavo"
date: "Saturday, November 29, 2014"
output: html_document
runtime: shiny
---
```r, echo = FALSE
require(xts)
require(xtsExtra)
x = rnorm(100)
y = rnorm(100)
idx = seq(as.Date("2000-01-01"), length = 100, by = "months")
Xxts = xts(cbind(x,y), order.by = idx)
checkboxInput("teste", "Teste", value = FALSE)
renderPlot(
plot.xts(Xxts[,1],panel = 1)
if(input$teste == TRUE)
addSeries(Xxts[,2], on = 1, type="l")
)
```【问题讨论】：
【参考方案1】：将您的 renderPlot 更改为
renderPlot(
if(input$teste == TRUE)
plot.xts(Xxts[,1],panel = 1)
addSeries(Xxts[,2], on = 1, type="l")
else
plot.xts(Xxts[,1],panel = 1)
)
【讨论】：
以上是关于闪亮：未选中复选框时，xts 图（xtsExtra）消失的主要内容，如果未能解决你的问题，请参考以下文章