如何在ggplot2中绘制图表成对比较（仅示例统计信息）

Question

我想制作一个条形图，显示均值，均值的标准误以及成对的显着比较。

类似的东西：

我拥有的数据仅是均值和均值的标准误。

group   x   mean   se of mean
a       1   3.650   0.092
a       2   4.232   0.081
a       3   3.653   0.068
a       4   3.871   0.13
b       1   3.984   0.07
b       2   4.150   0.073
b       3   4.058   0.054
b       4   4.010   0.132
c       1   2.915   0.1
c       2   3.475   0.1
c       3   3.246   0.086
c       4   3.069   0.16

有什么想法吗？

Answer 1

您可以使用包ggsignif（https://cran.r-project.org/web/packages/ggsignif/README.html）来绘制成对比较的重要性：

library(ggplot2)
library(ggsignif)

# plot
ggplot(mpg, aes(class, hwy)) +
  geom_boxplot() +
  geom_signif(
    comparisons = list(c("compact", "midsize"), c("minivan", "suv")),
    map_signif_level = TRUE,
    textsize = 6
  ) +
  ylim(NA, 48)
#> Warning in wilcox.test.default(c(29, 29, 31, 30, 26, 26, 27, 26, 25, 28, :
#> cannot compute exact p-value with ties

^{由reprex package（v0.2.1）于2018-10-05创建}

Answer 2

使用mpg数据，我想您想比较1999年的class =小型货车和2008年的class = suv的高速公路，这与您的需求类似。

您可以添加新列以将两个变量粘贴在一起，创建类似minivan_1999，suv_2008的内容。使用 let headers = new Headers({ 'Content-Type': 'application/json' }); let options = new RequestOptions({ headers: headers }); return this.http.post(this.posts_Url, JSON.stringify(user),options).map( (response: Response) => <any>response.json() ); ，我为您演示配对的一部分：

ggpubr::stat_compare_means