在反应循环中创建DataFrame

Question

我使用闪亮来创建反应图。一切正常。此外，我想渲染一个表格，其中包含与图表使用的过滤数据相同的过滤数据。

在我通过renderPlot函数中的tidyverse（％＆gt;％过滤器）进行过滤之前。想要使用与以前相同的过滤器来绘制表格，我需要在渲染绘图之前将过滤后的数据库保存到df。

你知道如何实现这一目标吗？我试着这样做

dataInput <- reactive({
   data_angepasst  %>%
     filter(if (input$zeitpunkt.length() != 0) DOP %in% input$zeitpunkt) %>%
     filter(if (input$projekt.length() != 0) Projektname %in% input$projekt)
 })

之后，我尝试使用dataInput作为输入呈现数据。

我想知道为什么这不能按我希望的方式运作。