R 正在尝试为新冠病毒周期创建虚拟对象

我试图为特定日期创建一个虚拟变量（新冠病毒效应）

使用下面的代码时，在列中只得到NA

df$dummy <- ifelse(df$date > as.Date("2018-01-01", format = "%Y/%m/%d") &
                               df$date < as.Date("2020-06-15", format = "%Y/%m/%d"), 1, 0)

df$dummy截止日期（“2018-01-01”，格式=“%Y/%m/%d”）&
df$日期<截止日期（“2020-06-15”，格式=“%Y/%m/%d”），1,0）

有人知道怎么修吗

as.Date("2018-01-01", format = "%Y/%m/%d")

将返回NA，请使用以下选项之一：

as.Date("2018/01/01", format = "%Y/%m/%d")
as.Date("2018-01-01", format = "%Y-%m-%d")

我还要补充一点，dplyr是一个非常适合处理表的软件包，其结果可能如下所示：

library(dplyr)
df <- df %>% 
     mutate(Dummy = ifelse(date > as.Date("2018/01/01", format = "%Y/%m/%d") & date < as.Date("2020/06/15", format = "%Y/%m/%d"), 1, 0))

库（dplyr）
df%
变异（虚拟=ifelse（日期>截止日期（“2018/01/01”，格式=“%Y/%m/%d”）&日期<截止日期（“2020/06/15”，格式=“%Y/%m/%d”），1,0）

最后，添加一个可复制的示例总是很有帮助的，只需添加

df <- data.frame(date = as.Date(c("2018/05/01", "2018/01/01"), format = "%Y/%m/%d"))

---

df Hi@Alexvitoria，你能把数据的头（df$date）写进代码吗。另外，请在df$dummy前面加四个空格。。行将其转换为代码格式。如果您包含一个简单的示例输入和所需的输出，可用于测试和验证可能的解决方案，则更容易帮助您。谢谢各位，我已经整理好了！