时间戳

首页 > 解决方案 > 仪表板中的串扰过滤器可能性

r - 仪表板中的串扰过滤器可能性

问题描述

我正在编写一个 flexdashboard 并尝试使用串扰进行交互，因为遗憾的是，由于没有使用闪亮的网络服务器，闪亮是别无选择的。我尝试做的是在 SharedData 对象上设置三个过滤器（串扰）。这工作正常。

我想要实现的是，我的 plot_ly 图中只使用了一部分过滤器（在数据表中使用）。

此外，我试图在我的过滤器上获得标准选择，理想情况下是防止用户删除过滤器（因此必须根据选择激活一个过滤器）。

我通过谷歌进行了一项研究以找到解决方案（通过串扰或替代方案而不必使用闪亮），但没有找到任何东西。

您可以在下面找到我减少的代码行。

---
title: "Untitled"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: fill
---

```{r setup, include=FALSE}
library(flexdashboard)
require(crosstalk)
require(plotly)
```

```{r einlesen, include=FALSE}
mydata = data.frame(la = c("li", "la", "laune", "baer"), Jahr = c(2013, 2014, 2015, 2016), le = c("la", "le", "lu", "lol"), numbers = c(10, 100, 1000, 10000))
shared_mydata = SharedData$new(mydata)
```

Column {data-width=500}
-----------------------------------------------------------------------

### Tabellen

```{r}
bscols(widths = c(4,4,4),
filter_select("Gebiet", "Gebiet", shared_mydata, ~la, multiple = F),
filter_select("Jahr", "Jahr", shared_mydata, ~Jahr, multiple = F),
filter_select("Tätigkeit", "Tätigkeit", shared_mydata, ~le, multiple = F)
)
DT::datatable(shared_mydata, rownames = FALSE, options=list(columnDefs = list(list(visible=FALSE, targets=c(0:1)))))
```

Column {data-width=500}
-----------------------------------------------------------------------

### Zeitreihe

```{r}
plot_ly(shared_mydata, y = ~numbers, x = ~Jahr)
```

### Altersdiagramm

```{r}

```

数据表按预期工作（尽管我希望有一个预设过滤器而不能删除整个过滤器）。

是否有可能防止例如过滤器“Jahr”对绘图产生任何影响而不会失去其他过滤器的过滤效果？是否有任何替代方案来实现这一目标？

标签： rr-markdowninteractive

解决方案

推荐阅读