升级tidyverse后R Markdown仪表盘str_detect空字符串报错求助

核心原因 #

tidyverse更新后，stringr::str_detect()不再接受空字符串作为pattern参数，直接传入会触发错误，导致原有的全选逻辑失效。

三种可行解决策略 #

1. 分支判断法（清晰直观） #

直接根据下拉选项是否为"All"分支处理，全选时返回原始数据，否则执行过滤：

filtered_data <- if (input$dispositionTBL == "All") {
  # 全选时不做过滤
  original_data
} else {
  # 非全选时用str_detect匹配
  original_data %>%
    filter(str_detect(CATDISP, input$dispositionTBL))
}

2. 逻辑表达式嵌入法（管道友好） #

在filter()中嵌入条件逻辑，无需拆分代码分支：

filtered_data <- original_data %>%
  filter(
    # 全选时返回TRUE，即保留所有行；否则执行str_detect匹配
    input$dispositionTBL == "All" | str_detect(CATDISP, input$dispositionTBL)
  )

注：这里用|逻辑或，全选时第一个条件为TRUE，自动忽略后面的匹配逻辑。

3. 精确匹配替代法（更高效） #

如果你的CATDISP列值和下拉选项是精确匹配（无模糊需求），直接用==替代str_detect，彻底规避空字符串问题：

filtered_data <- original_data %>%
  filter(
    input$dispositionTBL == "All" | CATDISP == input$dispositionTBL
  )

内容的提问来源于stack exchange，提问作者Ralf Riedel