删除所有行中具有相同值的数据框的所有列

Question

我有一个这样的数据框:

1 NA 0.2 NA 1 2
2 NA 0.5 NA 1 6 
3 NA 0.7 NA 1 4 
4 NA 0.3 NA 1 4

我想删除所有行中具有相同值的列.我的数据框应如下所示:

1 0.2 2
2 0.5 6 
3 0.7 4 
4 0.3 4

有最简单的方法吗？

Answer 1

dataf[sapply(dataf, function(x) length(unique(x))>1)]