====== 16.ggplot2で棒グラフ ====== [[00.初めての医療統計rとezr:index.html|初めての医療統計RとEZRトップページ]] ===== ソースコード ===== https://colab.research.google.com/drive/1gVuuaOMJpDvK_S7PBabyC98arIBuqw2f?usp=sharing {{:00.初めての医療統計rとezr:pasted:20200808-090759.png}} https://colab.research.google.com/drive/1hsdpM_FlUAIK8KzZJDUaUetrRnEons3U?usp=sharing {{:00.初めての医療統計rとezr:pasted:20200808-085510.png}} https://colab.research.google.com/drive/1GkI6zytVGEquiBJAwWDOC83mTuf6BNii#scrollTo=wlLHMAvSyL3H 3群あったときに、2群のみ取り出す（本当はよろしくないが、、、）行を絞るときは、filter()関数列を絞るときは、select()関数 1列のみ取り出すときは、df$height ===== dplyr(tidyverseに含まれる)で表を編集してグラフを描いたり検定したりする ===== 行を絞るときは、filter()関数列を絞るときは、select()関数 1列のみ取り出すときは、df$height ggplot2 3群あったときに、2群のみ取り出す（本当はよろしくないが、、、）棒グラフ(factor)の順番を変える、3群のうち2群のみ表示する →scale_x_discrete()関数


library(tidyverse)

d <- iris %>%
  select(Sepal.Length, Species) %>%
  group_by(Species) %>%
  summarise(n = n(), mean = mean(Sepal.Length), sd = sd(Sepal.Length))
d


ggplot(d, aes(x=Species, y=mean)) + 
  geom_bar(stat="identity")

# 3群のうち、2群のみのグラフを表示するときは
# scale_x_discrete(limits=c("setosa", "versicolor")) のようにする
#  x軸はfactorにしておく、順番も指定できる
ggplot(d, aes(x=Species, y=mean)) + 
  geom_bar(stat="identity") +
  scale_x_discrete(limits=c("setosa", "versicolor"))

===== Rで棒グラフのリンク ===== http://www.restorative-pt.tokyo/archives/19091528.html 独学で始める統計×データサイエンス 2019年08月07日【3-7】棒グラフの基本とRのggplot2で棒グラフを作るgeom_bar関数 https://note.com/eiko_dokusho/n/nb7f5f52819a4 【R言語】ggplot2｜棒グラフとドットプロットを重ね合わせる eiko_programming 2020/04/13 ===== ggplot2のリンク ===== https://www.jaysong.net/ggplot_intro3/ ggplot2入門 [応用編] https://www.jaysong.net/RBook/ 私たちのR: ベストプラクティスの探究宋財泫 (Jaehyun Song)・矢内勇生 (Yuki Yanai) 最終修正: 2021-07-18 ===== お勧めの本 ===== ===== リンク ===== [[00.初めての医療統計rとezr:index.html|初めての医療統計RとEZRトップページ]]