如何使用dplyr获得计数？

Question

比方说，我们拥有的数据帧

df <- data.frame(x = c("a", "a", "b", "a", "c")) 

使用dplyr数，我们得到

df %>% count(x) 

    x n 
1 a 3 
2 b 1 
3 c 1 

我现在想要做对产出的正列计数。如果第n列命名为m，我要查找的结果是

m n 
1 1 2 
2 3 1 

这怎么可以用dplyr来完成？

非常感谢！

Answer 1

dplyrcount(n)似乎有问题。

例如：

d <- data.frame(n = sample(1:2, 10, TRUE), x = 1:10) 
d %>% count(n) 

一种解决方法是重命名n：

df %>% # using data defined in question 
    count(x) %>% 
    rename(m = n) %>% 
    count(m) 

Answer 2

sum((df %>% count(x))$n) 
##[1] 5 

Answer 3

如果你想数：

df %>% count(x) %>% summarise(length(n)) 
# length(n) 
#1   3 

如果你想总和：

df %>% count(x) %>% summarise(sum(n)) 
# sum(n) 
#1  5 

Answer 4

编辑：我错了。没有dplyr的最新版本，所以我没有count函数。

随着dplyr一个方法来计算是n()在你的榜样，你会做以下，以获得第一计数：

df <- data.frame(x = c("a", "a", "b", "a", "c")) 

df %>% group_by(x) %>% summarise(count=n()) 

然后，如果你想算特定的数，你可以做的事件：

df %>% group_by(x) %>% summarise(count=n()) %>% group_by(count) %>% summarise(newCount=n()) 

这是一个dplyr的方法。

Answer 5

如果您愿意尝试data.table，那可能是相当直接的。

df <- data.frame(x = c("a", "a", "b", "a", "c")) 
library(data.table) 
setDT(df)[, .N, by=x][, list(count_of_N=.N), by=N] 
# N count_of_N 
# 1: 3   1 
# 2: 1   2 

Answer 6

它不是纯plyr但是这可能工作：

countr<-function(x){data.frame(table(x))} 
t<-count(df,x) 
countr(t[,2])