开发者学堂课程【大数据之 R 语言速成与实战：R 的用户自定义函数】学习笔记，与课程紧密联系，让用户快速学习知识。
课程地址：https://developer.aliyun.com/learning/course/363/detail/4332
R 的用户自定义函数
内容介绍
用户自定义函数
用户自定义函数
ｍｙfｕｎｃｔｉｏｎ＜-fｕｎｃｔｉｏｎ（ａｇ1，ａｒｇ２...）{
sｔａｔｅｍｅｎｔｓ
rｅｔｕｒｎ（０ｂｊｅｃｔ）
}
举例：
mydate <- function(type){
+ switch (type,
+ long = format（Sys.time（），" % A %B %d %Y"），
+ short = format（Sys.time（），"%m %d %y"），
+ cat(type,"is not recognized type\n")
+)
+)
mydate ("long")
[1] "星期一 一月 04 2016"
[2] mydate ("short")
[1] "01-04-16"
mydate ("medium")
medium is not recognized type
> sum <- function(num) {
+ for(i in 1:num) {
＋X<-X＋i
+)}
>fix(sum)
>sum
[1] 6
> sum(4)
[1] 10
> sum(100)[1] 5050
