このページの2つのバージョン間の差分を表示します。
両方とも前のリビジョン 前のリビジョン | 最新のリビジョン 両方とも次のリビジョン | ||
00.初めての医療統計rとezr:10.wilcoxonの順位和検定 [2020/03/27] adash333 [tidyverseパッケージのwilcox.test()関数を用いる場合] |
00.初めての医療統計rとezr:10.wilcoxonの順位和検定 [2020/03/27] adash333 [tidyverseパッケージのwilcox.test()関数を用いる場合] |
||
---|---|---|---|
行 27: | 行 27: | ||
library(tidyverse) | library(tidyverse) | ||
- | data <- read_csv(" | + | data <- tribble( |
+ | ~pre, ~post, | ||
+ | # | ||
+ | 51, 53, | ||
+ | 68, 65, | ||
+ | 45, 51, | ||
+ | 80, 89, | ||
+ | 52, 48, | ||
+ | 66, 64, | ||
+ | ) | ||
- | summary(data$A) | + | summary(data$pre) |
- | summary(data$B) | + | summary(data$post) |
# Wilcoxon符号付順位和検定 | # Wilcoxon符号付順位和検定 | ||
- | wilcox.test(data$A, data$B, paired = TRUE) | + | wilcox.test(data$pre, data$post, paired = TRUE) |
</ | </ | ||