ループの後に空の数値ベクトル

Question

リストに300+テーブルのリストがあり、テーブルに行がない時間をカウントしようとしています。

だから、そうするために私が実行しているループがある：

> while (i < 333) { 
    b <- b + (nrow(allInfo[[i]])==0) 
    i <- i + 1 
} 

私は1 iに設定されていると0ともb <- vector("numeric", 1L)の両方にBを設定しようとした「整数」に設定する試してみました。ループの最後にbの値が "数値（空）"となってしまい、これを把握することができませんでした。

なぜこのような場合に役立つでしょうか？

Answer 1

この

while (i < 333) { 
    b <- b + (nrow(as.data.frame(allInfo[[i]]))==0) 
    i <- i + 1 
} 

リッチの答えは最高ですありません。

Answer 2

あなたが、

sum(sapply(allInfo, nrow) == 0) 

これは、リスト内の各要素の行数をつかむような単純な何かをしたいアトミックベクトルとして返される可能性があるようです。次に、整数の表現がTRUEの場合は1なので、ゼロに等しいものの数を決定し、結果の論理ベクトルを合計することができます。