用NA代替某些日期

Question

我試圖用NA代替某些日期。

我嘗試了以下，但它沒有奏效。

df <- data.frame(dates = seq.Date(as.Date("1910-01-01"), as.Date("1999-01-01"), "days")) %>% 
     mutate_if(dates < as.Date("1990-01-05"),NA) 

有誰知道如何做到這一點？

謝謝！

Answer 1

if mutate_if適用於列。你只需要一個正常發生變異：

df <- data.frame(dates = seq.Date(as.Date("1910-01-01"), as.Date("1999-01-01"), "days")) %>% 
    mutate(newdates=ifelse(dates < as.Date("1990-01-05"), dates ,NA)) 

Answer 2

不使用mutate，你也可以簡單地使用指定的日期比你的目標日期更大，以NA：

df$dates[df$dates < as.Date("1990-01-05")] <- NA