class: center, middle, inverse, title-slide # ggplot tutorial ## with kunoichi + ninjutsu theme ### <br><br> Emi Tanaka ### <br>2018/09/16 --- class: split-40 count: false .column[.content[ ```r *ggplot(iris) ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output1-1.png" width="100%" /> ]] --- class: split-40 count: false .column[.content[ ```r ggplot(iris) + * aes(Sepal.Length, Sepal.Width) ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output2-1.png" width="100%" /> ]] --- class: split-40 count: false .column[.content[ ```r ggplot(iris) + aes(Sepal.Length, Sepal.Width) + * geom_point() ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output3-1.png" width="100%" /> ]] --- class: split-40 count: false .column[.content[ ```r ggplot(iris) + aes(Sepal.Length, Sepal.Width) + geom_point() + * labs(x = "Sepal Length") ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output4-1.png" width="100%" /> ]] --- class: split-40 count: false .column[.content[ ```r ggplot(iris) + aes(Sepal.Length, Sepal.Width) + geom_point() + labs(x = "Sepal Length") + * labs(y = "Sepal Width") ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output5-1.png" width="100%" /> ]] --- class: split-40 count: false .column[.content[ ```r ggplot(iris) + aes(Sepal.Length, Sepal.Width) + geom_point() + labs(x = "Sepal Length") + labs(y = "Sepal Width") + * labs(title="The famous iris data") ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output6-1.png" width="100%" /> ]] --- class: split-40 count: false .column[.content[ ```r ggplot(iris) + aes(Sepal.Length, Sepal.Width) + geom_point() + labs(x = "Sepal Length") + labs(y = "Sepal Width") + labs(title="The famous iris data") + * labs(subtitle="Data collected by Anderson, Edgar (1935)") ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output7-1.png" width="100%" /> ]] --- class: split-40 count: false .column[.content[ ```r ggplot(iris) + aes(Sepal.Length, Sepal.Width) + geom_point() + labs(x = "Sepal Length") + labs(y = "Sepal Width") + labs(title="The famous iris data") + labs(subtitle="Data collected by Anderson, Edgar (1935)") + * aes(color= Species) ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output8-1.png" width="100%" /> ]] --- class: split-40 count: false .column[.content[ ```r ggplot(iris) + aes(Sepal.Length, Sepal.Width) + geom_point() + labs(x = "Sepal Length") + labs(y = "Sepal Width") + labs(title="The famous iris data") + labs(subtitle="Data collected by Anderson, Edgar (1935)") + aes(color= Species) + * theme_bw(base_size=16) ``` ]] .column[.content.center[ <img src="ggplot-tutorial_files/figure-html/output9-1.png" width="100%" /> ]] <!-- This css chunk can't be before the first class: split-40... lines --> ```css .remark-code{ line-height: 2; } ``` <style type="text/css"> .remark-code{ line-height: 2; } </style>