我有一个带有过滤条件的闪亮应用程序，例如，如果case1为true，我想保留特定verctor的所有值，否则，我将使用输入Shiny进行过滤。我已经使用基本R做到了这一点，并且可以使用，但是现在需要使用dplyr优化我的应用程序。谢谢
filter(
ifelse(input$case1 == TRUE,
perimetre_commercial_estime %in% perimetres,
perimetre_commercial_estime %in% input$perimetre
)
)
编辑1：
基数R中的等效项是：
ifelse(input$case1 == TRUE,
my.data <- my.data[my.data$perimetre_commercial_estime %in% perimetres, ],
my.data <- my.data[my.data$perimetre_commercial_estime %in% input$perimetre, ]
)
编辑2：
杰夫回答后，我只是将ifelse语句替换为if（condition）else，它很好用...有什么建议吗？
filter(if(input$case1 == TRUE){perimetre_commercial_estime %in% perimetres}
else {perimetre_commercial_estime %in% input$perimetre}
您好，MTB，
听起来好像您应该先将条件放入过滤器中。所以：
if (condition)
var <- filter(perimetre_commercial_estime %in% perimetres)
else
var <- filter(perimetre_commercial_estime %in% input$perimetre)
您的帖子建议，针孔应该在filter（）函数之外；dplyr允许组合/排除逻辑参数，例如&&和|| 但在相同背景下
希望我理解了这个问题，我自己在这里寻找了一些意想不到的闪亮/ dplyr行为...
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句