R语言基础培训第四讲 简单编程课件.ppt

文档介绍：简单函数编写赖江山******@,用户自己编写的程序可以直接调用。R无需声明变量的类型,这与别的语言不同。基本格式函数名<-function(数据,参数1=默认值,…){表达式(循环/判别);return(返回值);}函数内部也可用#添加注释2程序流程控制ifif(条件)表达式if(条件)表达式1else表达式2举例{if(p<=)print("p<=")elseprint("p>")}3循环for,whilefor(变量in向量)表达式用法:for(iin1:10)print(i)while(条件)表达式用法:i<-1while(i<10){print(i)i<-i+1}4返回值返回值表示函数输出的结果。返回值必须是一个对象。R默认将最后一行作为返回值。如果函数的结果需要有多个返回值,可以创建一个list(),并返回该对象。也可以用return()函数,设定返回值。但是一个函数的返回的对象只有一个。5简单函数举例问题:输入直角三角形的两个边长,求其斜边长。定义函数:rcal=function(x,y){z<-x^2+y^2result<-sqrt(z)return(result)}调用函数:rcal(3,4)6条件函数举例问题:判断P值得显著性定义函数:pvalue<-function(x){if(x<)v=c("significent")elsev=c("notsignificent")return(v)}7条件函数举例问题:判断P值得显著性定义函数:pvalue<-function(data1){v=vector()for(iin1:length(data1)){if(data1[i]<)v[i]=c("significent")elsev[i]=c("notsignificent")}return(v)}8案例分析9