数据可视化1课件: http://rpubs.com/Chris7/slides_data_visualization1

数据可视化1视频: https://www.cctalk.com/v/15394352032782?xh_fshareuid=87b7f11f-6ceb-c339-6ae2-1632fe5f61ea&xh_preshareid=62d8a41f-679a-45d9-affb-dbded78a8f29

散点图

使用鸢尾花数据iris，先用names()看看里面都有啥，然后用花瓣长度和宽度做散点图
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiJuYW1lcyhpcmlzKSIsInNvbHV0aW9uIjoicGxvdChpcmlzJFBldGFsLkxlbmd0aCwgaXJpcyRQZXRhbC5XaWR0aCkifQ==
在plot函数里面添加细节，修改点的形状pch和颜色col，比如白色空心圆换成红色雪花:
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJwbG90KGlyaXMkUGV0YWwuTGVuZ3RoLCBpcmlzJFBldGFsLldpZHRoLFxuICBjb2wgPSBcInJlZFwiLCBwY2ggPSA4KSJ9

lattice 程序包里的函数

载入lattice包，使用xyplot()函数来做上面的图：
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiJsaWJyYXJ5KGxhdHRpY2UpXG54eXBsb3QoKSIsInNvbHV0aW9uIjoibGlicmFyeShsYXR0aWNlKVxueHlwbG90KFBldGFsLldpZHRoIH4gUGV0YWwuTGVuZ3RoLCBpcmlzLFxuICBjb2wgPSBcInJlZFwiLCBwY2ggPSA4KSJ9

按品种来做上面的图，分成三个面板：

eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiJsaWJyYXJ5KGxhdHRpY2UpXG4jIiwic29sdXRpb24iOiJsaWJyYXJ5KGxhdHRpY2UpXG54eXBsb3QoUGV0YWwuV2lkdGggfiBQZXRhbC5MZW5ndGggfCBTcGVjaWVzLCBpcmlzKSJ9
在xyplot() 函数里，添加layout=c()把三个图拍成一列三行
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiJsaWJyYXJ5KGxhdHRpY2UpXG4jIiwic29sdXRpb24iOiJsaWJyYXJ5KGxhdHRpY2UpXG54eXBsb3QoUGV0YWwuV2lkdGggfiBQZXRhbC5MZW5ndGggfCBTcGVjaWVzLFxuICBpcmlzLCBsYXlvdXQgPSBjKDEsIDMpKSJ9
把上面的图存成（赋值给）变量myPlot，使用赋值符号 <-
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiJsaWJyYXJ5KGxhdHRpY2UpXG5teVBsb3Q8LSIsInNvbHV0aW9uIjoibGlicmFyeShsYXR0aWNlKVxubXlQbG90PC14eXBsb3QoUGV0YWwuV2lkdGggfiBQZXRhbC5MZW5ndGggfCBTcGVjaWVzLFxuICBpcmlzLCBsYXlvdXQgPSBjKDEsIDMpKVxubXlQbG90In0=
在下图中修改坐标轴xlab, ylab的名称并添加标题 relationship between width and length of Iris petal`:
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiJsaWJyYXJ5KGxhdHRpY2UpXG54eXBsb3QoUGV0YWwuV2lkdGggfiBQZXRhbC5MZW5ndGgsIGlyaXMsXG4gIGNvbCA9IFwicmVkXCIsIHBjaCA9IDgpIiwic29sdXRpb24iOiJsaWJyYXJ5KGxhdHRpY2UpXG54eXBsb3QoUGV0YWwuV2lkdGggfiBQZXRhbC5MZW5ndGgsIGlyaXMsXG4gIGNvbCA9IFwicmVkXCIsIHBjaCA9IDgsXG4gIHhsYWI9XCJXaWR0aFwiLFxuICB5bGFiPVwiTGVuZ3RoXCIsXG4gIG1haW49XCJyZWxhdGlvbnNoaXAgYmV0d2VlbiB3aWR0aCBhbmQgbGVuZ3RoIG9mIElyaXNcIlxuICApIn0=

直方图

使用 airquality 数据，绘温度 Temp 直方图
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJoaXN0KGFpcnF1YWxpdHkkVGVtcCkgIn0=
加一个横坐标：
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJoaXN0KGFpcnF1YWxpdHkkVGVtcCwgeGxhYiA9IFwiVGVtcGVyYXR1cmVcIikifQ==
加一个标题
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJoaXN0KGFpcnF1YWxpdHkkVGVtcCwgeGxhYiA9IFwiVGVtcGVyYXR1cmVcIiwgbWFpbj1cIlRoZSBEaXN0cmlidXRpb24gb2YgVGVtcGVyYXR1cmVcIikifQ==
频率变密度：
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJoaXN0KGFpcnF1YWxpdHkkVGVtcCwgeGxhYiA9IFwiVGVtcGVyYXR1cmVcIixmcmVxID0gRkFMU0UsIG1haW49XCJUaGUgRGlzdHJpYnV0aW9uIG9mIFRlbXBlcmF0dXJlXCIpIn0=
同样是密度（频率）的直方图，用 MASS里面的 truehist()来绘制:
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiJsaWJyYXJ5KE1BU1MpIiwic29sdXRpb24iOiJsaWJyYXJ5KE1BU1MpXG50cnVlaGlzdChhaXJxdWFsaXR5JFRlbXAsIHhsYWIgPSBcIlRlbXBlcmF0dXJlXCIsbWFpbj1cIlRoZSBEaXN0cmlidXRpb24gb2YgVGVtcGVyYXR1cmVcIikifQ==
给点不同的颜色看看：
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJ0cnVlaGlzdChhaXJxdWFsaXR5JFRlbXAsIHhsYWIgPSBcIlRlbXBlcmF0dXJlXCIsIG1haW49XCJUaGUgRGlzdHJpYnV0aW9uIG9mIFRlbXBlcmF0dXJlXCIsY29sPVwicmVkXCIpIn0=

四幅图放在一个面板里，两个一排。

eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiJsaWJyYXJ5KE1BU1MpXG5cbnBhcihtZnJvdz1jKDIsMikpIiwic29sdXRpb24iOiJsaWJyYXJ5KE1BU1MpXG5cbnBhcihtZnJvdz1jKDIsMikpXG5cbmhpc3QoYWlycXVhbGl0eSRUZW1wKVxuXG50cnVlaGlzdChhaXJxdWFsaXR5JFRlbXAsIGNvbD1cInJlZFwiKVxubGluZXMoZGVuc2l0eShhaXJxdWFsaXR5JFRlbXApKVxuXG5oaXN0KGFpcnF1YWxpdHkkV2luZClcblxudHJ1ZWhpc3QoYWlycXVhbGl0eSRXaW5kLCBjb2w9XCJibHVlXCIpXG5saW5lcyhkZW5zaXR5KGFpcnF1YWxpdHkkV2luZCkpIn0=

library(MASS)

par(mfrow=c(2,2))

hist(airquality$Temp)

truehist(airquality\(Temp, col="red") lines(density(airquality\)Temp))

hist(airquality$Wind)

truehist(airquality\(Wind, col="blue") lines(density(airquality\)Wind))

箱图

使用mtcars里的mpg做箱图
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJib3hwbG90KG10Y2FycyRtcGcpIn0=
使用mtcars里的mpg做箱图，给箱图添加坐标轴和标题：
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJib3hwbG90KG10Y2FycyRtcGcsIG1haW49XCJDYXIgTWlsYWdlIERhdGFcIiwgXG4gIFx0eGxhYj1cIk51bWJlciBvZiBDeWxpbmRlcnNcIiwgeWxhYj1cIk1pbGVzIFBlciBHYWxsb25cIikifQ==
在上图的基础上，把图拆分成不同引擎数量的mpg的箱图
eyJsYW5ndWFnZSI6InIiLCJzYW1wbGUiOiIjIiwic29sdXRpb24iOiJib3hwbG90KG1wZ35jeWwsZGF0YT1tdGNhcnMsIG1haW49XCJDYXIgTWlsYWdlIERhdGFcIiwgXG4gIFx0eGxhYj1cIk51bWJlciBvZiBDeWxpbmRlcnNcIiwgeWxhYj1cIk1pbGVzIFBlciBHYWxsb25cIikifQ==

完结撒花～