R语言入门和使用技巧

R语言入门和使用技巧LijunJinIntroductionParametersGraphicsamplesContentsChapter1.IntroductionIntroductionR语言的概述定义：R是用于统计分析、绘图的语言和操作环境。R是属于GNU系统的一个自由、免费、源代码开放的软件，它是一个用于统计计算和统计制图的优秀工具。功能:R是一套完整的数据处理、计算和制图软件系统。R语言的发展1980年（贝尔实验室）R完善（MathSoft公司的统计科学部）R系统（Auckland大学的RobertGentleman和RossIhaka）Risfree！R语言的运用免费，开源，统计模块齐全避免了像商业软件在固定的分析过程中存在的问题用户可以得知其中的计算会暗含着何种漏洞或错误可自由计算任何想计算的统计量（包括图形）Introduction资源网站资源：R主页：统计之都：：：：=1书籍资料：统计建模与R软件（推荐）颜色卡片：超级卡片：下载：(中文版）StatisticsandRReadingNotes(统计学与R读书笔记)Rcharts基本运算符号符号命令或运算提示符+续行符基本算术运算例子+4+5-5-4*5*4/4/5^4^5赋值符例子=x=5-x-5-x-5assignassign(“x”,5)求助符例子??parhelp()help(par)整除%/%5%/%3余数%%5%%3向量数值型&整型&单精度实型&双精度实型逻辑型复值型字符型向量构建c()没有什么规律seq()seq(from,to,by,length.out)rep()rep(x,...)数值型向量例子1:10[1]12345678910x-c(10.4,5.6,3.1,6.4,21.7)[1]10.45.63.16.421.7seq(10)#sameas1:10[1]12345678910seq(1,10,by=1.5)#步长为1.5[1]1.02.54.05.57.08.510.0seq(1,6,by=3)#步长为3[1]14seq(0,5,length.out=11)#生成向量长度为11[1]0.00.51.01.52.02.53.03.54.04.55.0rep(1:10)[1]12345678910rep(1:10,2)#整个向量重复2次[1]1234567891012345678910rep(1:3,each=5)#每个元素重复5次[1]111112222233333rep(1:3,1:3)#每个元素分别重复1、2、3次[1]122333rep(1:4,each=2,len=10)[1]1122334411数组x=array(1:24,3)[1]123x=array(1:24,3,4)[1]123x=array(1:24,c(3,4))[,1][,2][,3][,4][1,]14710[2,]25811[3,]36912t(x)[,1][,2][,3][1,]123[2,]456[3,]789[4,]101112x=array(1:24,c(3,4,2)),,1[,1][,2][,3][,4][1,]14710[2,]25811[3,]36912,,2[,1][,2][,3][,4][1,]13161922[2,]14172023[3,]15182124矩阵matrix(1:15,nrow=3,ncol=5,byrow=TRUE)[,1][,2][,3][,4][,5][1,]12345[2,]678910[3,]1112131415x-matrix(1:15,nrow=3)[,1][,2][,3][,4][,5][1,]1471013[2,]2581114[3,]3691215is.matrix(x)[1]TRUEx=array(1:24,c(3,4,2))is.matrix(x)[1]FALSEy-matrix(x,nrow=3)[,1][,2][,3][,4][,5][,6][,7][,8][1,]1471013161922[2,]2581114172023[3,]3691215182124数据框与列表1.数据框是一种矩阵形式的数据结构。2.数据框内含的数据可以是不同类型的数据。3.每一列的数据必须是同一类型，且每一列的长度必须相同。4.数据框可以由data.frame()构建。5.数据框的构建：方法1:读文件read.table()表格式文件read.csv()逗号分隔的文件read.delim()tab键分隔的文件方法2：读变量x=c(42,7,64,9)y=1:4z.df=data.frame(INDEX=y,VALUE=x)INDEXVALUE11422273364449as.data.frame(z.df)INDEXVALUE11422273364449Xmingusage•Step1:installXminginWindow•Step2:clinkXminginLinux•Step3:displaypictureXmingusageChapter2.ParametersDrawelement•par()函数的参数详解•plot()及相关函数的参数说明parplotadj,bg,lendbty,cex,col,font,las,lty,family,lwd,ann,new,mar,mex,mgp,mfool,mfrow,oma,pch,pty,tck,tcl,las,xaxt,yaxt,lab,srt,xpdtype,main,sub,xlab,ylab,xlim,ylim,axes,asp,log,col,pch,cex,lty,lwd,ParchartsParchartsCol:图中符号（点、线等）的颜色,col.axis坐标轴刻度标记的颜色col.lab坐标轴标题的颜色col.main图主标题的颜色col.sub图副标题的颜色Parchartsmfrow,mfcolmar,omax-c(1:5)par(ann=F,mar=c(4,4,4,6))plot(x,pch=10,col=4,cex=3,axes=F)mtext('side=1,line=0',side=1,line=0,cex=2)mtext('side=2,line=1',side=2,line=1,cex=2)mtext('side=3,line=2',side=3,line=2,cex=2)mtext('side=4,line=3',side=4,line=3,cex=2)box()plotchartsplot(c(10,20),c(1,13),col=white,xlab=,ylab=,main=type=,xaxt=n,yaxt=n,cex.main=2.5)ltypes=c(l,p,b,c,o,s,S,h)lpos=c(seq(0,10,2),13,15)for(iinseq_along(ltypes)){lines(lpos[i]+1:20,1:20,type=ltypes[i],lwd=3)}text(9.5+1:8,12-1:8,c(l,p,b,c,o,s,S,h),cex=2,col=red)plot(c(10,20),c(0,10),col=white,xlab=,ylab=,main=lty=,xaxt=n,ylim=c(0,9.6),cex.main=2.5)lnames=c(blank,solid,dashed,dotted,dotdash,longdash,twodash,51,9396,848481)for(iin1:10){abline(h=i-1,lty=lnames[i],lwd=3)text(15,i-0.5,lnames[i],cex=2)}plotchartsplot(c(0.5,1.5),c(0,3),col=white,xlab=,ylab=,main=cex=,xaxt=n,yaxt=n,cex.main=2.5)for(iinseq(0,3,0.2)){points(0,i,pch=16,cex=i)text(1,i,paste(i),cex=i)}plot(c(10,20),c(2^3,2^5.5),col=white,xlab=,ylab=,main=lwd=,xaxt=n,log=y,cex.main=2.5,yaxp=c(0.1,50,2))for(iin1:9){lines(c(11,19),c(2^(i-4),2^(i-4)),lwd=2^(i-4))text(15,2^(i-4+0.5),2^(i-4),cex=2)}Cex:图上元素（文本和符号等）的缩放倍数；取值为一个相对于1的数值cex.axis坐标轴刻度标记的缩放倍数cex.lab坐标轴标题的缩放倍数cex.main图主标题的缩放倍数cex.sub图副标题的缩放倍数plotchartsplot(c(0,4.5),c(0,4),col=white,xlab=,ylab=,main=pch=,xaxt=n,yaxt=n,cex.main=2.5)for(iin0:24){points(i%%5,i%/%5,pch=i,cex=2)text(0.3+i%%5,i%/%5,i,cex=2)}Texttitletitle(main=NULL,sub=NULL,xlab=NULL,ylab=NULL,line=NA,outer=FALSE,...)texttext(x,y=NULL,labels=seq_along(x),adj=NULL,pos=NULL,offset=0.5,vfont=NULL,cex=1,col=NULL,font=NULL,...)mtextmtext(text,side=3,line=0,outer=FALSE,at=NA,adj=NA,padj=NA,cex=NA,col=NA,font=NA,...)Textplot(1:10,(-4:5)^2,main=ParabolaPoints,xlab=xlab)mtext(10ofthem)for(sin1:4)+mtext(paste(mtext(...,line=-1,{side,col,font}=,s,+,cex=,(1+s)/2,)),line=-1,+side=s,col=s,font=s,cex=(1+s)/2)mtext(mtext(...,line=-2),line=-2)mtext(mtext(...,line=-2,adj=0),line=-2,adj=0)plot(-1:1,-1:1,type=n,xlab=Re,ylab=Im)K-16;text(exp(1i*2*pi*(1:K)/K),col=2,cex=2)par(ann=F,new=T)plot(1:10,1:10,main=text(...)examples\n~~