r-检查一行中所有值是否相同或为NA的最有效方法

Question

我想检查每行中的所有值是否相同，但是NA应该被忽略MWE:

library(data.table)
DT=data.table(v1=c(1,2,3),v2=c(1,3,3), v3=c(NA,2,3))
DT
v1 v2 v3
1:  1  1 NA
2:  2  3  2
3:  3  3  3
desired=c(T,F,T)
desired
[1]  TRUE FALSE  TRUE

Answer 1

我得到了一个有效的想法

v1 = do.call(pmin, c(DT, na.rm = TRUE))
v2 = do.call(pmax, c(DT, na.rm = TRUE))
v1 == v2