R语言基础培训第四讲-简单编程.pptx

简单函数编写赖江山 lai@2016年4月24日编程基础 R可以灵活的编写程序，用户自己编写的程序可以直接调用。R无需声明变量的类型，这与别的语言不同。基本格式 函数名 - function(数据,参数1= 默认值,…) { 表达式(循环/判别); return(返回值); }函数内部也可用#添加注释程序流程控制 ifif(条件) 表达式 if(条件) 表达式1 else 表达式2 举例{if(p=0.05) print(p = 0.05)else print(p 0.05)}循环 for, whilefor(变量 in 向量) 表达式用法： for(i in 1:10) print(i)while(条件) 表达式 用法:i - 1while(i10){ print(i) i - i + 1}返回值返回值表示函数输出的结果。返回值必须是一个对象。R默认将最后一行作为返回值。如果函数的结果需要有多个返回值，可以创建一个list()，并返回该对象。也可以用return()函数，设定返回值。但是一个函数的返回的对象只有一个。简单函数举例问题:输入直角三角形的两个边长，求其斜边长。定义函数：rcal = function(x,y){ z - x^2 + y^2 result - sqrt(z) return(result)}调用函数：rcal(3,4)条件函数举例问题:判断P值得显著性定义函数：pvalue - function(x){ if (x0.05) v=c(significent) else v=c(not significent)return(v)}条件函数举例问题:判断P值得显著性定义函数：pvalue - function(data1){ v=vector() for(i in 1:length(data1)){if (data1[i]0.05) v[i]=c(significent) else v[i]=c(not significent)}return(v)}案例分析推荐的教材Crawley Statistics an introduction using R Peter Dalgaard Introductory statistics with RE. Paradis R for Beginners Verzani SimpleR.D G Rossiter Introduction to the R Project for Statistical Computing for use at ITC J. Maindonald Using R for data analysis and graphics introduction code and commentary using RVenables, W. N. Ripley, B. D. Modern Applied Statistics with S R网络资源R主页: /R资源列表 NCEAS /scicomp/software/r/scicomp/software/rR Graphical Manual http://bm2.genes.nig.ac.jp/RGM2/index.phphttp://bm2.genes.nig.ac.jp/RGM2/index.php统计之都: //QuikR /// R语言中文论坛 /Rbbs/forums/list.page/Rbbs/forums/list.page 持之以恒=R的高手！lai@lai@