R指令复制

Question

我想获得重复的总和。例如，

No. MRN Bicycle 
1. 010  1 
2. 011  1 
3. 011  1 
4. 012  0 
5. 013  1 
6. 014  0 
7. 015  1 
8. 015  1 
9. 015  1 

1 is yes 
0 is no 

我可以知道R代码里面那MRN 011具有1米的自行车。不是2（MRN 015具有1不是3）我想知道总数的自行车回答，因为）。不是。请告诉我如何将命令放入R. 谢谢。

Answer 1

我们可以用table，找到“MRN的是有重复。

+(table(df1[-1])>1)[,2] 
# 10 11 12 13 
# 0 1 0 0 

如果我们需要的总和，只是sum

sum(table(df1[-1])>1) 
#[1] 1 

---

把它包如果目的是找出是否有any“自行车”在每个“MRN”

+(table(df1[-1])>0)[,2] 
#10 11 12 13 
#1 1 0 1 

及其sum是3.