R语言系列:自定义function】的更多相关文章

R语言系列:生成数据 (2014-05-04 17:41:57) 转载▼ 标签: r语言 教育 分类: 生物信息 生成规则数据1.使用“:“,如x=1:10,注意该方法既可以递增也可以递减,如y=10:12.seq,有两种用法:①seq(起点,终点,步长); ②seq(length=9, from=1, to=5)    seq还有一种简写:seq(x)    #相当于1:length(x),但当length(x)为0时,返回integer(0)3.c(1,2,8)4.使用scan(),可以等待…
在用R语言做各种事物时,用户自定义函数是不可或缺的.这期来讲讲如何自定义R的function.首先要介绍的是function的基本框架: myfunction <- function(arg1, arg2, ... ){ statements return(object) } 1 2 3 4 函数名称为myfunction arg1,arg2 为参数 statements 为函数语句 return(object)返回结果 两个例子 例子一:随机数产生,画图 function1 <- funct…
学习R语言半年多了,以前比较注重统计方法上的学习,但是最近感觉一些基础知识也很重要.去年的参考资料是<R语言实战>,今年主要是看视频.推荐网易云课堂里的教程,很多资料都是很良心的~ 目前学习的是:R语言数据分析挖掘实战,讲的很全,从基础知识到R语言机器学习的应用. (我是先从后面机器学习开始学的,发现老师在里面用到很多自定义函数.循环,以前在书上看到这些也没有实际操作过,所以赶紧看前面的视频补补课) 今天的例子都很简单啦... 1.while循环 s<-1 i<-0 while(i…
假设有如下数据,我们使用plot函数作图 月龄 体重 月龄 体重  1 4.4 9 7.3 3 5.3 3 6.0 5 7.2 9 10.4 2 5.2 12 10.2 11 8.5 3 6.1 R语言中默认函数 abs   绝对值 sqrt   平方根 exp  e^x次方 log   自然对数 log2 log10  其他对数 sin  cos tan 三角函数 sinh cosh tanh  双曲函数 poly  正交多项式 polyroot  多项式求根 assign   赋值操作 等同…
一.R是什么 R语言是由新西兰奥克兰大学的Ross Ihaka和Robert Gentleman两个人共同发明. 其词法和语法分别源自Schema和S语言. R定义:一个能够自由幼小的用于统计计算和绘图的语言和环境,它提供了广泛的统计分析和绘图技术. 二.R的优势 国际上R语言已然是专业数据分析领域的标准. 1.R是免费的开源软件. 2.全面的统计研究平台,提供了各种各样的数据分析技术. 3.R是一个程序设计语言,所以他的能力可以很容易地通过使用用户定义的函数扩展. 4.R拥有顶尖水准的制图功能…
一.函数构造器 每一个R函数都包括三个部分:函数名,程序主体以及参数集合,在编写自定义R函数时,需要将三个部分各自储存在一个R对象中.这里需要使用function函数,形如: my_function<-function(){} function函数可以将大括号内的代码内容构建成一个函数,例如: roll<-function(){ dice<-sample(1:6,2,replace = T)#可重复抽样 sum(dice) } roll() 函数将返回最后一行的运行输出结果,如果最后一行…
基本运算符号  1.基本数学计算  +.-.*./.^.%%(求模).%/%(整除)  注意:求模运算两边若为小数,则整数和小数部分分别求模.例:5.6%%2.2  2.比较运算  >.<.>=.<=.==.!=  3.&.|.!.&&.||.xor  注意:运算符"逻辑与"和"逻辑或"存在两种形式,"&"和"|"作用在对象中的每一个元素上并且返回和比较次数相等长度的逻辑…
DT 包提供了 JavaScript 库 DataTables 的一个R接口,它使得R对象(矩阵或数据框)可以在HTML页面上显示为表格. 该包的DataTables函数生成的表格提供了数据的筛选.分页.排序及其他功能,目前依法不再CRAN上. 安装方法 install.packages("DT", repos="https://cloud.r-project.org/") 查看文档 ??DT 使用方法 该包的一个主要函数是 datatable().这个函数通过创建…
文件内容: id,SGBH,DMSM1,SGDO,SGFSSJ 1,310117620,伤人事故,上海市,2018-03-02 20:04:00 2,310117621,死亡事故,杭州市,2018-03-02 20:04:00 3,310117622,财产损失事故,无锡市,2018-03-02 20:04:00 4,310117623,伤人事故,南京市,2018-03-02 20:04:00 主要原因是最后一行没有换行(at the end of line press enter),需要换到下一…
#sink("matrix_history.txt") cat("请输入矩阵的行和列数,“,”号隔开,建议行 等于列 数:") number<-scan(what="character",sep=",") number<-matrix(number,,,TRUE) number=apply(number,,as.numeric) row<-number[,] clo<-number[,] #print(…