小编Emi*_*ily的帖子

我的 R Shiny 应用程序中有一系列输入，我将它们用作函数的参数，以从数据框中选择特定数据。输入是 dateInput：

dateInput("dateSelect", "Date", format = "yyyy-mm-dd", value = NA)

在我的函数中，我需要指定 dateSelect 是空白还是未选中，以便能够选择所有日期。查看一个正常工作的示例，它不是日期，还有一个简单的 selectInput：

selectInput("teamSelect", "Team", choices = c("All", levels(newEffortstable$team)))

在函数中，这适用于选择“所有团队”：

    if(!missing(teamSelect)){
    if(teamSelect!="All"){
    selections[["teamEfforts"]] = 
    newEffortstable$effortNo[which(newEffortstable$team %in% teamSelect)]
    }else{
    selections[["teamEfforts"]] = newEffortstable$effortNo
    }
    }

我已经尝试了以下NA和NULL和" "并不断收到“如果错误：参数长度为零”

    if(!missing(dateSelect)){
    if(!dateSelect== "NA"){
    selections[["dateEfforts"]] = 
    newEffortstable$effortNo[which(newEffortstable$date == dateSelect)]
    }else{
    selections[["dateEfforts"]] = newEffortstable$effortNo
    }
    }

谢谢！