r - R 中每个强度下 N 次试验的正确百分比

Question

我无法弄清楚如何找到 V3 中每个不同数字的正确百分比。V4 显示答案是否正确。V2 是块号。

V2 V3 V4 

1  4  1      
1 10  1  
1  4  0  
1  4  1  
1 10  0  
2  8  1
2  8  0

谢谢你的帮助。我是 R 新手，已经在谷歌上搜索了几个小时这个问题！

Answer 1

调用您的数据框DF：

tapply(DF$V4 * 100, DF$V3, mean)

将为您提供 中每个唯一数字的正确百分比V3。

Answer 2

在这里使用 data.table 可能会有所帮助

library(data.table)
mydt <- data.table(DF, key="V2")
mydt[, mean(V4), by=V3]

结果：

   V3        V1
1:  4 0.6666667
2: 10 0.5000000
3:  8 0.5000000

---

然后，如果您想从美学角度对其进行清理：

# you can format it nicely using round
mydt[, round(100*mean(V4),2), by=V3]

#      V3    V1
#   1:  4 66.67
#   2: 10 50.00
#   3:  8 50.00


# you can give the new column a name (wrap it all in a list)
mydt[, list("Percent" = round(100*mean(V4),2)), by=V3]

#     V3   Percent
#   1:  4    66.67
#   2: 10    50.00
#   3:  8    50.00