我想要在R中获得可靠性!= 1的值

Question

我想知道在我的数据框中有多少值与1不同。

我的输入如下：

simulation, day, reliability
1, 1, 0.999
1, 2, 0.999
1, 3, 0.999
2, 1, 1
2, 2, 0.999
2, 3, 1
3, 1, 0.98
3, 2, 0.98
3, 3, 1

输出应如下所示：

day, counter
1, 2
2, 3 
3, 1

首先要感谢大家！

Answer 1

您可以取逻辑值的和来计算每天有多少个逻辑值不同于1。

在基数R中：

aggregate(reliability~day, df, function(x) sum(x != 1))

dplyr：

library(dplyr)
df %>%group_by(day) %>% summarise(counter = sum(reliability != 1))

和data.table：

library(data.table)
setDT(df)[, .(counter = sum(reliability != 1)), day]

Answer 2

尽管Ronak已经提供了一个详尽的答案，但仍然是一种替代方法

library(dplyr)
df %>% filter(reliability != 1) %>% group_by(day) %>% summarise(counter = n())