存在a.R里面的脚本文件
oddcount<-function(x){
k<-0
for(n in x){
if(n%%2==1) k<-k+1
}
return(k)
}
如何调用
第一步:找到a.R文件 1) source(“a.R”) 2) 先打开脚本文件,然后点击上方的运行按钮
第二步:在第一步没有报错的情况下,执行oddcount(向量参数),然后就可以调用脚本文件
里面的参数了
注意:函数也可以直接写在控制台,但是出错后不好改,建议写在脚本文件中
1、%%是取余数的求模运算
2、 for(n in x){
if(n%%2==1) k<-k+1
}
等同于 for(n in 1:length(x)){
if(n%%2==1) k<-k+1
}
#可以理解为 从x的数据的第一个开始取,一直到它的长度个(最后一个)为止。
#默认参数
> g<-function(x,y=2,z=T){...}
函数中给y和z都设定了一个值(称为默认值),T是true的意思
调用函数 g(12,z=FALSE) #函数中x的值为12,y为2,z被覆盖变为FALSE
注意:尽量不要用TRUE和FALSE的缩写T、F,容易和变量混淆