布劳氏多样性指数

Question

我正在使用布劳的多样性指数进行分析
BlauN = 1- ∑Nk（Nk-1）/ N（N-1） 其中Nk =第K个类别中组成员的绝对频率，N =成员总数

数据包括： 250个案例，50个组和F_eth（具有组成员种族作为五个类别之一的因素变量：高加索人，亚洲人，南亚人，原住民和其他）

我的数据摘录在这里：

> head(d1h3.1)
  case group     F_eth
1    1     1     Asian
2    2     1 Caucasian
3    3     1 Caucasian
4    4     1 Caucasian
5    5     2     Asian
6    6     2     Asian

最终输出将使我在新列中对Blau指数进行分组汇总。我试图使用dplyr突变两个cols，即Nk和N，以便最终创建BlauN，但被困在创建Nk中。