如何在列方向上找到具有最大变量数的行r

Question

我有一个包含数千行和25列的数据框。行具有不同的长度，这意味着并非所有行都具有所有列的值。但是，空单元格始终位于行的末尾：

1  1  1  1
1  1  1
1  1  1  1  1  1  1  1
1  1  1  1  1  1

如何找到最长的行？在上面的示例中，它将是第3行。

Answer 1

如果缺失的值是NA，那么所有这些值都在最后。

 indx <- which.max(rowSums(!is.na(df1)))

或者我们可以使用apply循环遍历行

 indx <- which.max(apply(df1, 1, function(x) length(x[!is.na(x)])))

如果缺失值为''

 indx <- which.max(apply(df1, 1, function(x) length(x[x!=''])))