函数

函数与参数

(1)形式参数与实际参数

图片.png

(2)写函数的函数 function(){ }

图片.png

> 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个是必须填的，其他的参数都有默认值

图片.png
练习：写一个函数，输入参数为一个数值型向量，输出结果为：该向量的“中位数”和“平均数”，并写出用户使用该函数的代码 。

> 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")

图片.png

数据的读取参数

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加载

图片.png