エントリがない場合のエントリ数をカウントする

Question

データ収集中に発生するエラーを追跡するテーブルがあります。エラーがなければ、Error列の項目は「なし」です。私はこれがうまくいくError != 'None' データフレーム内のエントリ数をカウントしようとしている：

ErrorCount<-subset(df, Error != 'None') 
ErrorCount <- ErrorCount$Error 
ErrorCount <- as.data.frame(table(ErrorCount)) 
ErrorCount <- sum(ErrorCount[,2]) 

エラーがまったく存在しない場合を除き。空のテーブルはカウントできません。何も結果がないときに私はこの返り値を0にすることができますどのような提案はError != 'None'？

Answer 1

通常のサブセットを使用します。私はランダムテーブルを作成する関数を作った：

set.seed(313) 

make_error_table <- function(prob){ 

data.frame(Data = rnorm(10), 
      Error = sample(c("Error", "None"), replace = TRUE, prob = prob)) 
} 

tab1 <- make_error_table(c(0.5, 0.5)) 
tab2 <- make_error_table(c(1, 0)) 

sum(tab1$Error == "None") 
[1] 5 
sum(tab2$Error == "None") 
[1] 0