R语言:自定义函数
2016-10-25 17:28
471 查看
R语言系列:自定义function
在用R语言做各种事物时,用户自定义函数是不可或缺的。这期来讲讲如何自定义R的function。首先要介绍的是function的基本框架:myfunction <- function(arg1, arg2, ... ){ statements return(object) }
函数名称为myfunction
arg1,arg2 为参数
statements 为函数语句
return(object)返回结果
两个例子
例子一:随机数产生,画图
function1 <- function(x,y){ plot(x,y) return(x+y) } > x <- rnorm(10) > y <- rnorm(10,2,3) > function1(x,y) [1] 1.5828019 0.2661017 -2.7666838 9.9395144 3.3619610 -0.9452065 -6.4638374 -0.3288615 1.1402272 [10] -0.1285368
出结果图
例子二:判断、条件句
function2 <- function(x,npar=TRUE,print=TRUE) { if (!npar) { center <- mean(x); spread <- sd(x) } else { center <- median(x); spread <- mad(x) } if (print & !npar) { cat("Mean=", center, "\n", "SD=", spread, "\n") } else if (print & npar) { cat("Median=", center, "\n", "MAD=", spread, "\n") } result <- list(center=center,spread=spread) return(result) } > x<-rnorm(10,0,1) > function2(x) Median= 0.2469624 MAD= 1.161068 $center [1] 0.2469624 $spread [1] 1.161068
总结
看懂这两,基本的函数应该可以实现,稍微复杂的,或别的更加复杂的函数,那就需要经验了。多练习多写代码是实现快速写代码的重要途径!
相关文章推荐
- R语言-要点琐细及自定义函数的创建
- R语言-编写自定义函数
- R语言自定义函数及基本分支循环结构
- ASP中和星期有关的自定义函数
- 转载:向 XPath 中添加自定义函数
- 最常用的自定义函数
- 通知php使用自定义的session处理函数来操作session,而不使用php预置的方法
- T-SQL: 三个通用的与日期相关的,辅助按周(星期日是周的最后一天)汇总的自定义函数
- SQL取得最大排序数字并累加1的自定义函数
- --第一次写的sql自定义函数……(如果你是高手看了别笑……)
- 用自定义函数实现中文字首字母的查询
- InstallShield内部库函数之6 自定义对话框函数
- FormatDate 用户自定义的一个函数!
- Oracle自定义函数——f_henry_ConcatRowsByColumn
- T-SQL: 17 个与日期时间相关的自定义函数(UDF),周日作为周的最后一天,均不受 @@DateFirst、语言版本影响!
- 最常用的自定义函数
- 自己写的一个数据库自定义函数实例
- T-SQL: 三个通用的与日期相关的,辅助按周(星期日是周的最后一天)汇总的自定义函数
- 读写INI文件的自定义函数(VB)
- Hibernate 针对 Oracle 特有函数及自定义函数的实现办法