是否有 group_by 和组合的 R 代码

Question

我正在寻找可以计算每组总数中 2 的组合的 R 代码。

library(dplyr)
    id<-c(1,1,1,1,2,2,2,2,3,3,3,3)
    sex<-c(1,1,1,1,1,1,1,1,1,1,1,1)
    ds<-data.frame(id,sex)
    out1<-ds %>% group_by(id) %>% summarise(n=n())

我的输出应该是

 id<-c(1,2,3)
    n<-c(4,4,4)
    ncomb2<-c(6,6,6)

谢谢

Answer 1

我不确定下面的代码是不是你想要的

out1 <- ds %>%
    group_by(id) %>%
    summarise(n = n()) %>%
    mutate(ncomb2 = choose(n,2))

这样

> out1
# A tibble: 3 x 3
     id     n ncomb2
  <dbl> <int>  <dbl>
1     1     4      6
2     2     4      6
3     3     4      6

是否有 group_by 和组合的 R 代码

is there a R code for group_by and combinations

r

dplyr

combn