函数
函数与参数
(1)形式参数与实际参数
(2)写函数的函数 function(){ }
> g <- function(x,y=0.5){
+ seq(x,3*x,y)
+ }
> g(2)
[1] 2.0 2.5 3.0 3.5 4.0 4.5 5.0 5.5 6.0
> g(1,1)
[1] 1 2 3
(3)默认参数:作者会设计很多参数,但只有前1~n个是必须填的,其他的参数都有默认值
练习:写一个函数,输入参数为一个数值型向量,输出结果为:该向量的“中位数”和“平均数”,并写出用户使用该函数的代码 。
> g <- function(x){
+ c(mean(x),median(x))
+ }
> a <- seq(1,3,1)
> g(a)
[1] 2 2
注: 有多个输出结果时,将输出的结果组成一个向量;;当一个函数里需要返回多个值(比如有变量,有向量,有矩阵)时,我们要用list,而不是return
R包
R包来源
(1)CRAN网站
http://cran.r-project.org/web/views/
(2)Bioconductor BiocManager::install()
http://bioconductor.org/
(3)github devtools::install_github()
http://github.com/
满分操作:判断式安装
if(!require(stringr))install.packages("stringr")
数据的读取参数
header=T #第一行为列名
row.names=1 #第一列为行名
check.names=F #不将内部符号发生转变
comment.char="!" #将!开头的行标记为注释行,在读取时忽略这些行
fill = TRUE,能够在读取时自动补齐,避免出现某一个观察的变量不足而无法读入,但是在读入后应检查你的数据框
skip = 65,能够在读取时自动跳过前65行
将gse导出为新的txt和csv文件
> write.table(gse,file = "z.txt")
> write.csv(gse,file = "zz.csv")
将gse保存为Rdata并加载
> save(gse,file = "ex.Rdata")
> load("ex.Rdata")
用save生成的文件只能用load加载