Dplyr过滤器错误 问题:

Dplyr过滤器错误 问题:,r,filter,shiny,dplyr,R,Filter,Shiny,Dplyr,我在dplyr的过滤动词方面遇到了一个奇怪的问题。我正在尝试按当前月份和当前年份筛选data.frame。我已经为以下两个方面创建了反应函数: current.month <- reactive({ gsub("0", " ", format(Sys.Date(), "%m")) current.year <- reactive({ format(Sys.Date(), "%Y") 这不会返回任何输出 然而,当我硬编码输入时,我的表返回时没有任何问题 df[df$REPORT

我在dplyr的过滤动词方面遇到了一个奇怪的问题。我正在尝试按当前月份和当前年份筛选data.frame。我已经为以下两个方面创建了反应函数:

current.month <- reactive({
   gsub("0", " ", format(Sys.Date(), "%m"))
current.year <- reactive({
format(Sys.Date(), "%Y")
这不会返回任何输出

然而,当我硬编码输入时,我的表返回时没有任何问题

df[df$REPORT == input$dropdown.report, ] %>%
   filter(Month == "4" & Year == "2018")
谁能把我引向正确的方向?您可以使用iris数据集重新创建此问题。我理解输出对于可复制的示例很重要,但我不能共享我公司的数据

编辑:
出于计数目的,my data.frame将日期变量分为两列:月、年。Month是一个没有前导0的单个字符-这就是为什么我需要使用上面的gsub函数

当前.month()中有一个不需要的
空格
字符

0
替换为


current.month()

0
替换为

df[df$REPORT == input$dropdown.report, ] %>%
   filter(Month == "4" & Year == "2018")
> gsub("0", " ", format(Sys.Date(), "%m"))
[1] " 4"
> gsub("0", "", format(Sys.Date(), "%m"))
[1] "4"