Как рассчитать и вставить стандартную ошибку среднего (SEM) в сгруппированную гистограмму в R? - PullRequest
Новая
       32

Как рассчитать и вставить стандартную ошибку среднего (SEM) в сгруппированную гистограмму в R?

0 голосов
/ 21 октября 2018

У меня есть данные с несколькими переменными в длинном формате.Мне нужно создать графики с «Rt» и «Площадь» как оси «х» и «у» и сгруппированы по другим переменным с помощью SEM.Код, который я использую, и его вывод приведены ниже.«gc» - это данные в коде.

У меня есть два вопроса:

  1. Показывает ли график, который я нанес, среднее значение данных по оси y для этой переменной (Пол в данном случае) или что-то еще?

  2. Как рассчитать стандартную «ошибку среднего» для каждой переменной и использовать ее на сгруппированных столбчатых диаграммах.

Любая помощь высоко ценится.

Данные: 

Sugar   Desiccant   Water   Sex Condition   Treatment   Rt  Area
Yes No  Yes Male    C   C1M1    Rt_15.36    0
Yes No  Yes Male    C   C1M2    Rt_15.36    0
Yes No  Yes Male    C   C2M1    Rt_15.36    0.001051812
Yes No  Yes Male    C   C2M2    Rt_15.36    0.000419
Yes No  Yes Male    C   C3M1    Rt_15.36    0
Yes No  Yes Male    C   C3M2    Rt_15.36    0
Yes No  Yes Male    C   C4M1    Rt_15.36    0
No  Yes No  Male    D   D1M1    Rt_15.36    0.008066459
No  Yes No  Male    D   D1M2    Rt_15.36    0
No  Yes No  Male    D   D2M2    Rt_15.36    0
No  Yes No  Male    D   D3M1    Rt_15.36    0
No  Yes No  Male    D   D3M2    Rt_15.36    0
No  No  No  Male    N   N1M1    Rt_15.36    0
No  No  No  Male    N   N1M2    Rt_15.36    0
No  No  No  Male    N   N2M1    Rt_15.36    0
No  No  No  Male    N   N3M2    Rt_15.36    0
No  No  No  Male    N   N4M1    Rt_15.36    0
No  No  Yes Male    S   S1M1    Rt_15.36    0.002877659
No  No  Yes Male    S   S1M2    Rt_15.36    0.002080645
No  No  Yes Male    S   S2M1    Rt_15.36    0
No  No  Yes Male    S   S2M2    Rt_15.36    0
No  No  Yes Male    S   S3M1    Rt_15.36    0
No  No  Yes Male    S   S3M2    Rt_15.36    0
No  No  Yes Male    S   S4M1    Rt_15.36    0
No  No  Yes Male    S   S4M2    Rt_15.36    0
Yes No  Yes Female  C   C1F1    Rt_15.36    0
Yes No  Yes Female  C   C1F2    Rt_15.36    0
Yes No  Yes Female  C   C2F1    Rt_15.36    0
Yes No  Yes Female  C   C2F2    Rt_15.36    0
Yes No  Yes Female  C   C3F1    Rt_15.36    0
Yes No  Yes Female  C   C3F2    Rt_15.36    0
Yes No  Yes Female  C   C4F1    Rt_15.36    0
Yes No  Yes Female  C   C4F2    Rt_15.36    0
No  Yes No  Female  D   D1F1    Rt_15.36    0
No  Yes No  Female  D   D1F2    Rt_15.36    0
No  Yes No  Female  D   D2F1    Rt_15.36    0
No  Yes No  Female  D   D2F2    Rt_15.36    0
No  Yes No  Female  D   D3F1    Rt_15.36    0
No  Yes No  Female  D   D3F2    Rt_15.36    0
No  No  No  Female  N   N1F1    Rt_15.36    0
No  No  No  Female  N   N1F2    Rt_15.36    0
No  No  No  Female  N   N2F1    Rt_15.36    0
No  No  No  Female  N   N2F2    Rt_15.36    0
No  No  No  Female  N   N3F1    Rt_15.36    0
No  No  No  Female  N   N3F2    Rt_15.36    0
No  No  No  Female  N   N4F1    Rt_15.36    0
No  No  No  Female  N   N4F2    Rt_15.36    0
No  No  Yes Female  S   S1F1    Rt_15.36    0
No  No  Yes Female  S   S1F2    Rt_15.36    0
No  No  Yes Female  S   S2F1    Rt_15.36    0
No  No  Yes Female  S   S2F2    Rt_15.36    0
No  No  Yes Female  S   S3F1    Rt_15.36    0
No  No  Yes Female  S   S3F2    Rt_15.36    0
No  No  Yes Female  S   S4F1    Rt_15.36    0
No  No  Yes Female  S   S4F2    Rt_15.36    0
Yes No  Yes Male    C   C1M1    Rt_15.45    0.022850984
Yes No  Yes Male    C   C1M2    Rt_15.45    0.02464737
Yes No  Yes Male    C   C2M1    Rt_15.45    0.02283425
Yes No  Yes Male    C   C2M2    Rt_15.45    0.022010019
Yes No  Yes Male    C   C3M1    Rt_15.45    0.025739489
Yes No  Yes Male    C   C3M2    Rt_15.45    0.024794804
Yes No  Yes Male    C   C4M1    Rt_15.45    0.022935658
No  Yes No  Male    D   D1M1    Rt_15.45    0.028642801
No  Yes No  Male    D   D1M2    Rt_15.45    0.02663422
No  Yes No  Male    D   D2M2    Rt_15.45    0.027265084
No  Yes No  Male    D   D3M1    Rt_15.45    0
No  Yes No  Male    D   D3M2    Rt_15.45    0.031478437
No  No  No  Male    N   N1M1    Rt_15.45    0.032024619
No  No  No  Male    N   N1M2    Rt_15.45    0.03154595
No  No  No  Male    N   N2M1    Rt_15.45    0.032244057
No  No  No  Male    N   N3M2    Rt_15.45    0.03046623
No  No  No  Male    N   N4M1    Rt_15.45    0.024763212
No  No  Yes Male    S   S1M1    Rt_15.45    0.02674154
No  No  Yes Male    S   S1M2    Rt_15.45    0.029004283
No  No  Yes Male    S   S2M1    Rt_15.45    0.027453816
No  No  Yes Male    S   S2M2    Rt_15.45    0.025879553
No  No  Yes Male    S   S3M1    Rt_15.45    0.026072074
No  No  Yes Male    S   S3M2    Rt_15.45    0.026099444
No  No  Yes Male    S   S4M1    Rt_15.45    0.028103265
No  No  Yes Male    S   S4M2    Rt_15.45    0.027382495
Yes No  Yes Female  C   C1F1    Rt_15.45    0.033458237
Yes No  Yes Female  C   C1F2    Rt_15.45    0.034080466
Yes No  Yes Female  C   C2F1    Rt_15.45    0.042108189
Yes No  Yes Female  C   C2F2    Rt_15.45    0.040836621
Yes No  Yes Female  C   C3F1    Rt_15.45    0.03247633
Yes No  Yes Female  C   C3F2    Rt_15.45    0.03562171
Yes No  Yes Female  C   C4F1    Rt_15.45    0.036355341
Yes No  Yes Female  C   C4F2    Rt_15.45    0.036314075
No  Yes No  Female  D   D1F1    Rt_15.45    0.030164789
No  Yes No  Female  D   D1F2    Rt_15.45    0.029889857
No  Yes No  Female  D   D2F1    Rt_15.45    0.032203984
No  Yes No  Female  D   D2F2    Rt_15.45    0.030590972
No  Yes No  Female  D   D3F1    Rt_15.45    0.035254108
No  Yes No  Female  D   D3F2    Rt_15.45    0.036099612
No  No  No  Female  N   N1F1    Rt_15.45    0.033665101
No  No  No  Female  N   N1F2    Rt_15.45    0.035215613
No  No  No  Female  N   N2F1    Rt_15.45    0.037278238
No  No  No  Female  N   N2F2    Rt_15.45    0

Код: 

g2 <- ggplot(gc, aes(fill=Condition, y=Area, x=Rt)) + 
  geom_bar(position="dodge" , stat="identity" )

g2 + theme(axis.text.x=element_text(angle=90, hjust=1))

Мой график без SEM: My graph without SEM

...