《R语言》课件 第5章 数据可视化.pdf

大数据应用人才培养系列教材第五章数据可视化5.1 低水平绘图命令5.2 高水平绘图命令5.3 交互绘图命令 习题5.1低水平绘图命令第五章数据可视化点【例5.1】随机产生80个点，并绘制图形。set.seed(1234)xyplot(x=x,y=y)plot(x,y)执行结果020 40 x60 80 1005.1低水平绘图命令第五章数据可视化点添加标题和标签 plot(x/y/xlab=name Plot)执行结果of x/ylab=name of y”,main=ScatterScatter Plot1 OSAj o e e u0 20 40 60 80 100name of x5.1低水平绘图命令第五章数据可视化点更改点的形状默认情形下，绘图字符为空心点，可以使用pch选项参数进行更改.plot(x,yzxlab=name of xzylab=name of yzmain=Scatter+Plot,xlim=c(l/80),ylim=c(0/200),pch=19)执行结果Scatter Plot0 20 40 60 80name of x5.1低水平绘图命令第五章数据可视化点与颜色相关的参数5.1低水平绘图命令第五章数据可视化线【例5.2】随机产生50个时间点，并绘制图形。t set.seed(1234)vplot(t/v/type=T,)执行结果5.1低水平绘图命令第五章数据可视化线type的取值:type二 p”表示点type二T表示线,type二 b”表示点划线。(2)更改线条类型R中提供了很多类型的线条，可以通过I ty选项来设定。执行plot(t,ptype=T,lty=2),结果如图5.6。O、OO CM01020t3040505.1低水平绘图命令第五章数据可视化线I ty取值对应的线型0 246 8 105.1低水平绘图命令第五章数据可视化线(3)更改颜色与点更改点的颜色方法相同。(4)线条变宽 pl ot(tzvztype=TJwd=2)(5)点专线有前关：我们还需要将点突显出来，此时需要利用type选型。plot(tzvztype=b)(6)拟合平滑直线在做线性回归时，常常会在散点图中添加一条拟合直线以查看效果。model plot(xzy)#画点abline(modelzcol=blue)#画回归直线执行结果5.1低水平绘图命令第五章数据可视化线0 20 40 x60 80 1005.1低水平绘图命令第五章数据可视化线(7)拟合平滑曲线在散谭图上使同loess函数画一条拟合的平滑曲线。plot(x,y)model_loessf itordlines(xordzf itord/lwd=2Jty=2,col=blue)执行结果CD kOo0X60 80 1005.1低水平绘图命令第五章数据可视化面饼图饼图就是将一个圆（或者圆饼）按分类变量分成几块，每一块所占 的面积比例就是相对应的变量在总体中所占的比例。【例5.3】随机产生10年的数据，yearset.seed(1234)counts lb pie(countsjabels=lb)#画饼图 执行结果#构造标签5.1低水平绘图命令第五章数据可视化面(2)条形图条形图就是通过垂直或者水平的条形去展示分类变量的频数。利用例5.3数据绘制条形图。barplot(counts,names.arg=year;col=rainbow(lO)执行结果s-coB-CNIS-CD2001 2003 2005 2007 20095.1低水平绘图命令第五章数据可视化面(3)直方图前面介绍的两种图形一般都是用来处理二维数据的，那么对于一 维数据，常用的图形就有这里所说的直方图。直方图在横轴上将 数据值域划分成若干个组别，然后在纵轴上显示其频数。在R语言中，可以使用hist()函数来绘制直方图。set.seed(1234)x hist(x)Histogram of x执行结果 o nom o-2-10123 X5.1低水平绘图命令第五章数据可视化面修改颜色，组数hist(x/breaks=10/col=,gray)添加核密度曲线hist(x,breaks=10,f req 二 FALSE,col=gray)lines(density(x)zcol=redzlwd=2)添加正态密度曲蜃h xf ityf ityf itlines(xf it,yf itzcol=,blue,/lwd=2)5.1低水平绘图命令第五章数据可视化面(4)箱线图箱线图通过绘制连续型变量的五个分位数(最大值、最小值、25%分位数、75%分位数以及中位数)描述变量的分布。绘制例 5.3中数据counts箱线图:boxplot(counts)执行结果大数据应用人才培养系列教材第五章数据可视化5.1 低水平绘图命令5.2 高水平绘图命令5.3 交互绘图命令 习题5.2高水平绘图命令第五章数据可视化认识 ggplot2Q）特点gdplot2的核心理念是将绘图与数据分离，数据相关的绘图与 数据无关的绘图分离。ggplot2是按图层作图。ggplot2保有命令式作图的调整函数，使其更具灵活性。ggplot2将常见的统计变换融入到了绘图中。5.2高水平绘图命令第五章数据可视化认识 ggplot2(2)画布ggplot(data=zmapping=)(3)图甚体可以允许用户一步步的构建图形，方便单独对图层进行修改。图层用+表示，如：pp I ibrary(ggplot2)p p+geom_point()#第二层，画散点图.效果如图 40.20.：.10 15 20 25 30 355.2高水平绘图命令第五章数据可视化映射将年份映射到颜色属性：pp+geom_point()40-1015f actor(year)1999 2038cty30355.2高水平绘图命令第五章数据可视化映射将排量映射到散点大小(见图5.17):p p p p p+scale_color_manual(values=c(,blue2/red4)#增加标度f actor(year)19992008cty2 3 4 65.2高水平绘图命令第五章数据可视化标度标度函数 描述scale_alpha scale_brewer scale_continuo usscale_data scale_datetime scale_discrete scale_gradient scale_gradient2 scale_gradientnalpha通道值（灰度）谡色板，来自colorbrewer.org网站展示的颜色 标度连续标度日期日期和时间离散值两种颜色构建的渐变色3中颜色构建的渐变色n种颜色构建的渐变色5.2高水平绘图命令第五章数据可视化标度直接使用指定的取值，不进行标度转换scalejdentityscalejinetype用线条模式来展示不同scale manual手动指定离散标度scale_shape用不同的形状来展示不同的数值scale size用不同大小的对象来展示不同的数值5.2高水平绘图命令第五章数据可视化分面分面就是控制分组绘图的方法和排列形式。分面函数 facet_grid facet_wrap描述将分面放置在二维网格中 将一维的分面按二维排列5.2高水平绘图命令第五章数据可视化分面【例5.7按年分组，一列显示。p p p p p p+f acet_wrap(year;ncol=l)#分面5.2高水平绘图命令第五章数据可视化分面5.2高水平绘图命令第五章数据可视化其它修饰【例5.8增加图名并精细修改图例(见图5.22)。p p p p p P p p P5.2高水平绘图命令第五章数据可视化其它修饰汽车油耗与型号40-30-20-10-10 15 20 25每加仑城市公路行驶距离3035排里 2 3 4 5 6 7车型2seater compact mkisize minivan pickup su boom pact SUV5.2高水平绘图命令第五章数据可视化其它修饰【例5.9】条形图排序。class2 class2 mpg$class2 p p+geom_bar(aes(f ill=class2)#绘制条形图5.2高水平绘图命令第五章数据可视化其它修饰class2class2，2seater minivan pickup subcompact midsizeH compactI SUV5.2高水平绘图命令第五章数据可视化其它修饰【例5.10】根据年份分别绘制条形图，position控制位置调整方 式，图5.24为position=identity结果。p-ggplot(mpgz aes(class2zf ill=f actor(year)#分组填充 p+geom_bar(position=identity,/alpha=0.5)class25.2高水平绘图命令第五章数据可视化其它修饰p-ggplot(mpgz aes(class2zf ill=f actor(year)#分组填充 p+geom_bar(position=,dodge/alpha=0.5)#2010Enooof actor(year)199920085.2高水平绘图命令第五章数据可视化其它修饰p-ggplot(mpgz aes(class2,f ill=f actor(year)#分组填充p+geom_bar(position=stack,/alpha=0.5)#叠加条形图Zseater minivan pickup suboompact mdscze compact suv class25.2高水平绘图命令第五章数据可视化其它修饰p-ggplot(mpgz aes(class2,f ill=f actor(year)#分组填充 p+geom_bar(position=f iirzalpha=0.5)f actor(year)SUVZseater minivanpickup suboompact midsize compact class219992次大数据应用人才培养系列教材第五章数据可视化511低水平绘图命令5.2 高水平绘图命令5.3 交互绘图命令习题5.3交互绘图命令第五章数据可视化Charts 包library(rCharts)airquality$Month Run Appp G library(shiny)shinyServer(f unction(input,output)ui-shi nyUI(pagewithsi debar(headerpanel(利用R语言进行交互一玩玩shiny”)，sidebarPanel(),mainPanel()server-shinyServer(function(input,output)shinyAppfui,server)5.3交互绘图命令第五章数据可视化 shiny 包(4)UI布局对于页面的布局，推荐使用shinydashboard包。对全部，先使用dashboardPage。将所有内容扩起。标题:dashboardHeader(title=)!1 边栏：dashboardSidebarQ主体:dashboardBodyO5.3交互绘图命令第五章数据可视化 shiny 包(4)UI布局皮肤颜色选择：Blue、Black、Purple、Green、Red、Yellowui-dashboardPagef skin=green*dashboardHeader Ctitle=.利用R语曾进行交互),dashboards!debar(-s i debarMenu 则边标签名称 menuI temCr,tabNamemenuitem menuitem menuitem menuitem menuitem),表格，tabName=飞ayout图，tabNam=*plo 更美的图，vabName/_=iconf th*),e,icon=icon(*table*),icon=icon(*picture-o*),plot2,Jicon=icon(,picture-o*),再美一些的住，tabName=*plct3*,icon=iconCicture-o,badgeLabeuabName=,plot41,icon=icon(*picture-o*),badgeColr=yeow),dashboardBodyf tabltemsC tabI tem(tabName=侧边栏图标图标样式请参考：http:f ontawesome.io/icons/http:getbootstaD.com/components/#glYDhicons5.3交互绘图命令第五章数据可视化 shiny 包(4)UI布局利用R语；进行交互 三由布局孽袅格.a s.为更生的即 N再第-些的图 a最英的用5.3交互绘图命令第五章数据可视化 shiny 包(4)UI布局dashboards!debar(menuitem(布曷，tabName=*layout1,icon=icon(*th*),menuitem(输入”，tabName=inputl,icon=iconCsign-in*),menuitem(输 出，tabName=，output/,icon=iconCsign-out*),menuizemC tibname=Table,icon=1con)可/.ack gr ound=mar oon),背景填充色5.3交互绘图命令第五章数据可视化 shiny 包输入利用R语言进行交互 三尽最美的明Best!5.3交互绘图命令第五章数据可视化 shiny 包(6)输出文本输出Server:renderPrintUI:verbatimTextOutput&textOutput表格输出Server:renderTableUI:tableOutput图片输出Server:renderPlotIII:plotOutput5.3交互绘图命令第五章数据可视化 shiny 包(6)输出UI:tabI tem(tabName=outputl,f luidRow(box(title=结 果输 出，width,6,solidHeader=TRUE.status=primary”,(TerbatimTexTbutput(text.iris)|box(title=”去移输出。width=6.solidHjader=TRUE,status=success,p 1 otOutput(p1ot.*iris”,height=250)1),box(.mia=Pici华 田”uririth：12,sol i dHeader=TRUE,status=warning,tabi eOutput Ctable.iris)y-1)Server server:2.8001st Qu.sl.GOC1st Qu.:0300 verslcclor:5O：5.80C Medlar:3.000Medlar.:4.35C“edl.r:1.300 virginice Mean:5.643:5ONeg4.057虹：JC58Meas:1.1993rd Qu.:6.4X3cd Qu.,:3.3OO3rd Qu.:5.10C3rd Qu.:1.800Max.C.90C;4.400Nmx.s 6.900Max.Spec inWpaLWfafth PetMlength fMLWidth5 105.3交互绘图命令第五章数据可视化 shiny 包添加标签tabI tem(tabMi.b.*table-vabsetPanel(tabpanel(皆连表良”，tableoutput Ctable.hot,)/),tabPanel 交互表格”,boxC title=tagList(icon(sign-in*),输入),width=4f background=black1,radioButtons(,selectl1,“请选界：list(“技频道”=T,“按时间“=2)sei ectinput(programt”请选择频道：”，choices=hot.pro),S0】ectlnput(time.se1,i3 选择时间：”，choices=time),submitButtonC*、。田”),tabBox(title=tagLhtCkon-bl/),“表格展现“),width=8,tabPanelC 使用 View。，tabi eOutput(output.tabi el).tabPanel。使用 DT 包”，dataTableOutput(output.tableZ*)75.3交互绘图命令第五章数据可视化 shiny 包号签页tabsetPanel(由布局收视数我袅格普通袅格 交互*恬urovim 00 0 uH JpQ:30_judXtabPanel，普通表格”,tableoutput(table.hotn),I tabPanel，交互表格”J box(匐谕人埼选杆时间:00 10O搐恂f按时阎，决轿编湎:title=tagList(iconCsign-irT),输入”)width=4,background=black,radi oButtons(*sei ectlf,请选择：”，list。按频道“=1，“按时间“=2),sei ectI nput(1 program1,”请选择频道：”，choi ces=hot.pro),sei ectI nput(time.sei,”请选择时间：”，choices 三time),submitButton(更新视图),5.3交互绘图命令第五章数据可视化 shiny 包Box中的标签页tabPanel，“表格展现使用View()使用DT包tabBox)；title=tagList0 width=8,tabi eOutput(output.tabi el1)tabPanen：用 D丁包”，dataTableOutput(lroutput.tabi e2)5.3交互绘图命令第五章数据可视化 shiny 包利用Rm守且哀格 交互方格曜收通软弱裹电匍）入使用小使用DT包0之格a更美的用n逃择:O告恁10Search:角差一些的国圣美的的特诗量界舞通:Show 10 entries时同节目收次率100 3020100得别节目0 00064308661672025730130泉水之城-倩士上莫里茨0 000789577575996842402 00屏水之城瑞上至夏里茨0 000956937799042062502 30503:00703 30善卷-季2012 群星蒙吞大R欧，0.00105932203389831604 90904 30NULL0.001485884101040121005 00NULL0 0013550135501355Previous Shonmf 1 to 10 of 46 entries大数据应用人才培养系列教材第五章数据可视化511低水平绘图命令5.2 高水平绘图命令5.3 交互绘图命令习题习题:1.可以用来克服散点图中数据点重叠问题。A脸谱图 B直方图 C星状图 D向日葵散点图2.在箱线图中，箱体的底部表示_oA上四分位数 B中位数 C下四分位数D众数3.可以用来克服散点图中数据点重叠问题。A脸谱图 B直方图 C星状图 D向日葵散点图4.在箱线图中，箱体的底部表示_oA上四分位数B中位数 C下四分位数D众数5.图和_图有助于描绘两个变量间的关系。6.函数能按向量绘制图形。感谢聆听