R语言入门资料.ppt

* 绘图参数 参数用在函数内部，在没有设定值时使用默认值。 font = 字体,lty = 线类型,lwd = 线宽度,pch = 点的类型, xlab = 横坐标,ylab = 纵坐标, xlim = 横坐标范围, ylim = 纵坐标范围, 也可以对整个要绘制图形的各种参数进行设定 参见 par() * 举例：绘图 生成0到2之间的50个随机数，分别命名为x,y x - runif(50,0,2) y - runif(50,0,2) 绘图：将主标题命名为“散点图”， 横轴命名为”横坐标”， 纵轴命名为“纵坐标” plot(x, y, main=散点图, xlab=横坐标, ylab=纵坐标) text(0.6,0.6,text at (0.6,0.6)) abline(h=.6,v=.6) * 图 绘图举例 * 例：分步绘图 1.打开绘图窗口，不绘制任何对象 plot(x, y, type=n, xlab=, ylab=, axes=F) 2.添加坐标点 points(x,y) 3.添加坐标轴 axis(1); 4.axis(at=seq(0.2,1.8,0.2), side=2) 5.补齐散点图的边框 box() 5.添加标题、副标题、横轴说明、纵轴说明 title(main=Main title, sub=subtitle, xlab=x-label, ylab=y-label) * 图 分步绘图 1 2 3 4 5 6 * 一页多图 attach(mtcars) opar - par(no.readonly=TRUE) par(mfrow = c(2,2)) plot(wt,mpg,main=Scatterplot of wt vs. mpg) plot(wt,disp,main=Scatterplot of wt vs. disp) hist(wt, main=Histogram of wt) boxplot(wt, mai=Boxplot of wt) par(opar) detach(mtcars) * 在原有图形上添加元素 举例： x - rnorm(100) # 生成随机数 hist(x,freq=F) # 绘制直方图 curve(dnorm(x),add=T) # 添加曲线 h - hist(x, plot=F) # 绘制直方图 ylim - range(0, h$density, dnorm(0)) #设定纵轴的取值范围 hist(x, freq=F, ylim=ylim) #绘制直方图 curve(dnorm(x),add=T,col=red) #添加曲线 * 图 在原有直方图上添加曲线 * 四 编写函数 * 编程基础 R可以灵活的编写程序，用户自己编写的程序可以直接调用。 编程时无需声明变量的类型，这与C,C++等语言不同。 基本格式 函数名 - function(数据,参数1= 默认值,…) { 异常处理; 表达式(循环/判别); return(返回值); } 函数内部也可用#添加注释 * 函数实例 图 函数实例 data2mat() * 程序流程控制 if if(条件) 表达式 if(条件) 表达式1 else 表达式2 举例 p = 0.03 if (p=0.05) print(p = 0.05!) else print(p 0.05!) * 循环 for, while for(变量 in 向量) 表达式 用法： for(i in 1:10) print(i) while(条件) 表达式 用法: i - 1 while(i10){ print(i); i - i + 1} * 返回值 返回值表示函数输出的结果。 返回值必须是一个对象。 R默认将最后一行作为返回值。 如果函数的结果需要有多个返回值，可以创建一个list()，并返回该对象。 也可以用return()函数，设定返回值。 但是一个函数的返回的对象只有一个。 * 异常处理 如数据输入不能满足要求，或者参数设定错误等等，可能造成函数给出错误的结果，则需要对函数的运行过程发出警告或终止，以提高程序的稳健性。 警告的写法 if(any(is.na(inputdata))) inputdata - na.omit(inputdata) cat(“NAs are found in the input data, and has been removed.\n) 终止的写法 if(any(is.na(xx))) stop(NAs are not