r - 基于 3 个条件的计数

Question

我有一个数据集，想计算 3 个单独的条件

1. coins 和 copay 列中带有“0”的行数 - 将任一列中的 N/A 计为 0
2. coins.copay 列 = 1，但不包括满足条件 1 的值的行数
3. coins.copay 列 = 0，但不包括满足条件 1 的值的行数

这是来自更大数据集的样本:

Plan   Year   Coins   Copay   Type   Coins.Copay
 A     2018     0      NA      HMO        1
 B     2018    10      NA      HMO        1
 C     2017    NA       0      SNP        0
 D     2015    20      20      SNP        0
 E     2016    20       0      HMO        1
 F     2018    10      10      HMO        0
 G     2016    NA      NA      HMO        0
 H     2014    NA      NA      HMO        0
 I     2012    NA      10      PPO        0
 J     2011     0       0      HMO        0
 K     2014     5      10      SNP        0
 L     2013    10      NA      HMO        1

因此，我希望有以下计数(基于上述条件):

1. 5(方案A、C、G、H、J满足条件)
2. 3(方案B、E、L满足条件；方案A不视为满足条件1)
3. 4(方案 D、F、I、K 满足条件；方案 C、G、H、J 不计入满足条件 1)

Answer 1

这可以非常有效地使用 bool 逻辑来完成:

zeros_or_na <- (is.na(df$Coins) | !df$Coins) & (is.na(df$Copay) | !df$Copay)
sum(zeros_or_na)                     # [1] 5
sum(df$Coins.Copay & !zeros_or_na)   # [1] 3
sum(!df$Coins.Copay & !zeros_or_na)  # [1] 4