查找 R 中每行 3 列的最小值

ste*_*joe 3 r min

我有一个数据框,如下所示:

ID      D1          D2          D3
103     2015-01-15  2014-06-10  2015-04-13
450     NA          2015-10-03  2014-02-02  
103     NA          NA          NA          
222     2014-03-03  NA          NA     
Run Code Online (Sandbox Code Playgroud)

我需要添加一个名为“MinDate”的第 5 列,返回 R 中第 2 列到第 4 列中的三个不同日期的最小值,同时忽略 NA 值(尽管,如果全部都是 NA,则返回 NA 就可以了),例如下面:

ID      D1          D2          D3          MinDate
103     2015-01-15  2014-06-10  2015-04-13  2014-06-10
450     NA          2015-10-03  2014-02-02  2014-02-02
103     NA          NA          NA          NA
222     2014-03-03  NA          NA          2014-03-03
Run Code Online (Sandbox Code Playgroud)

我可能会构建一个大的令人讨厌的 ifelse 语句,但我更愿意利用 R 的强大功能和基本功能,...我只是不确定如何使用。我正在接近使用类似的东西:

df$MinDate <- apply(df, 1, min, na.rm = TRUE)
Run Code Online (Sandbox Code Playgroud)

但它包括 ID 列。

ste*_*joe 5

我想我明白了:

df$MinDate <- apply(df[,c(2:4)], 1, min, na.rm = TRUE)
Run Code Online (Sandbox Code Playgroud)