找出每个数字使用r出现在数据库中的次数

Question

所以我有一个数据库，它有一个id和几个字段，如：

private void OnTriggerEnter(Collider other)
{

    if (other.gameObject.CompareTag("Marker1_Object"))
    {
        print("Collision Detected!\n");
        other.gameObject.SetActive(false);
    }
}

我想知道什么是最好的方法来统计每个数字出现在数据库中的次数，而不管列数。以及每个号码在唯一ID中出现的次数。

Answer 1

使用tidyr包中的函数gather将数据框更改为长格式，然后使用plyr包中的函数ddply根据ID和值进行汇总：

df <- data.frame(ID = c(rep(1, 4), rep(2,3), rep(5,3)),
             Name1 = c(2,1,3,2,5,8,6,2,5,3),
             Name2 = c(3,2,4,1,2,3,2,1,8,2),
             Name3 = c(6,7,7,3,1,7,3,4,6,4))

library(tidyr)
library(plyr)
df<-gather(df, key="ID")
ddply(df, .(value), summarize, count=length(value)) #overall count
ddply(df, .(ID,value), summarize, count=length(value)) #count by ID