计算 R 表中特定行的一致性答案

【问题标题】：Calculate agreement for a specific row in a table in R计算 R 表中特定行的一致性
【发布时间】：2020-08-11 21:51:05
【问题描述】：

你好！我是 R 新手，我有这张表，我想找到相关性，在所有三个抛掷之间的第三行中有多少一致性。如何为特定行计算两个以上的值？（heads 是 1，tails 是 2）我可以检查一列与所有其他列之间的一致性吗？

     library(readxl)
     > COIN_TOSS <- read_excel("C:/Users/user/Desktop/COIN TOSS.xlsx")

          TOSS #1 TOSS #2 TOSS #3

 1         2         2         2
 2         2         2         1
 3         1         1         2
 4         2         1         1
 5         2         1         1
 6         2         1         2
 7         1         1         2
 8         1         1         2
 9         1         1         1
10         2         1         1

另外，我想打印一个带有值总和的图。我有每列的前 3 个值（总共 10 列）：（最常见的值是这些）
```
am <- excel__data$AM
oneam <- sort(table(am),decreasing=TRUE)[1:3]
>am
3  2  4   
31 26 24   
```

对于我使用的绘图，但 y 轴保持不变，最大值为 30，并且并非所有值（堆叠起来）都是可见的。如何将其更改为最高 200？除了情节和点，我可以使用其他东西吗？

 plot(oneam, pch=10, col='red')
 points(onecm, pch=10,col='blue') 
 points(onefm, pch=10,col='green')
 points(onekk, pch=10,col='yellow') 
 points(onekm, pch=10,col='black')
 points(onels, pch=10,col='orange')

【问题讨论】：

标签： r plot statistics correlation

【解决方案1】：

“协议”和“相关性”是非常不同的东西。

如果您想简单地查看“协议”，您可以计算逐行平均值和标准差。低标准偏差表明所有抛掷都相当接近，如果您愿意，您甚至可以通过除以 SD/MEAN 来获得方差系数 a % 指标来进行标准化。

您甚至可以更具体地计算从一个特定投掷到另外两个的“距离度量”，例如：

library(dplyr)
COIN_TOSS %>%
 mutate(Toss3_Delta = ((TOSS1+TOSS2)/2-TOSS3)/((TOSS1+TOSS2)/2))

现在，如果我们在您的示例中讨论相关性，这仅适用于列，因为三种情况不足以计算相关性。

这行得通：

library(magrittr)

COIN_TOSS %$%
  cor()

【讨论】：

我编辑了帖子并指定我正在寻找协议。感谢您的提醒。
@NewbieEevee 在这种情况下，请真正研究方差指标。最有可能的标准偏差已经满足大多数标准，但 CoV 也可能是相关的。如果您想查看各个列，只需计算平均值的 SD 数。