在R

时间:2019-03-19 22:35:02

标签: r dataframe bar-chart mean errorbar

我正在尝试根据R中的以下数据框创建条形图。

   StudyType CatTest
1          a      28
2          a      18
3          a      22
4          a      22
5          a      29
6          a      25
7          a      33
8          a      25
9          a      15
10         a      26
11         a      21
12         a      30
13         a      15
14         a      16
15         a      24
16         a      21
17         a      24
18         a      32
19         a      21
20         a      25
21         b      46
22         b      42
23         b      48
24         b      45
25         b      NA
26         b      45
27         b      48
28         b      42
29         b      NA
30         b      44
31         b      35
32         b      46
33         b      48
34         b      38
35         b      NA
36         b      33
37         b      42
38         b      42
39         b      NA
40         b      NA
41         c      29
42         c      29
43         c      34
44         c      32
45         c      34
46         c      43
47         c      36
48         c      37
49         c      35
50         c      44
51         c      38
52         c      28
53         c      31
54         c      26
55         c      36
56         c      35
57         c      34
58         c      38
59         c      32
60         c      30
61         d      33
62         d      34
63         d      29
64         d      28
65         d      33
66         d      32
67         d      38
68         d      38
69         d      36
70         d      34
71         d      27
72         d      25
73         d      28
74         d      27
75         d      29
76         d      27
77         d      39
78         d      32
79         d      30
80         d      30

我想在条形图上绘制每个组(a,b,c,d)的平均值,但是我发现当我使用以下代码时,我只能绘制总数每个组的值:

ggplot(df1, aes(x=StudyType, y=CatTest)) +
  geom_bar(stat='identity', fill='grey') +
  theme_classic()

除了手动计算每个组的平均值并将其添加到新的数据框中外,我无法想到解决方案。但是,这种方法被证明很耗时。

我也想在图表上添加误差线,但是如果不能绘制平均值,我将无法做到这一点。

0 个答案:

没有答案