Retruns a vector or array or list of values obtained by applying a function to margins of an array or matrix.
就是说apply把一个function作用到array或者matrix的margins（可以理解为数组的每一行或者每一列）中，返回值时vector、array、list。
简单的说，apply函数经常用来计算矩阵中行或列的均值、和值的函数，具体方法如下：
定义一个3×2的矩阵：
rname = c("one","two","three")
cname = c("first","second")
b <- matrix(1:6,nrow=3, dimnames = list(rname, cname))
b为：
first second
one 1 4
two 2 5
three 3 6
继续举几个例子：
apply(b,1,sum)
上面的指令代表对矩阵b进行行计算，分别对每一行进行求和。函数涉及了三个参数：
第一个参数是指要参与计算的矩阵；
第二个参数是指按行计算还是按列计算，1——表示按行计算，2——按列计算；
第三个参数是指具体的运算参数。
上述指令的返回结果为：
one two three
5 7 9
值得注意的是，apply函数时可以针对数组进行计算你的，就是说数组未必是2维的！！
举一个3维的情况：
首先顶一个三维数组：
x=array(1:24,c(2,3,4))
三维数组为：
, , 1
[,1] [,2] [,3]
[1,]135
[2,]246
, , 2
[,1] [,2] [,3]
[1,]79 11
[2,]8 10 12
, , 3
[,1] [,2] [,3]
[1,] 13 15 17
[2,] 14 16 18
, , 4
[,1] [,2] [,3]
[1,] 19 21 23
[2,] 20 22 24
使用如下指令：
apply(x,1,sum)
则对1到23的所有奇数进行求和，结果为：
[1] 144 156
同样，第二个参数改成2后，
apply(x,2,sum)
结果为：
[1] 84 100 116
是按照第二个维度进行的求和计算。
第二个参数改成3后，
apply(x,3,sum)
结果为：
[1] 21 57 93 129
即对第三个维度进行求和计算。
对于apply()函数的第三个参数，制定了具体用什么函数进行计算，之前例子里使用的都是sum，对于用户自定义的函数同样可以在这里使用。还用前面的矩阵b来举例。
定义了一个求平方和的函数：
myfun <- function(x){
sum(x^2)
}
如果选择按行计算平方和，可使用如下指令：
apply(b,1,myfun)
计算结果为：
one two three
172945
通常情况大家使用apply之后是需要把apply的返回值作为输入在其他代码中使用的，这里尤其重要的一点是apply的返回值的维度。上面的例子就算每一行或者每一列的sum，使用apply之后，返回都是一个向量，并不会因为apply计算行（列）的sum就会自动返回一个列（行）向量。
比如：for（i in 1:10）{
x<-c(x,i+1)
t<-c(x,i-1)
}
现在用apply替换的话我尝试这样写：
f=function(x){
t=x+1
m=x-1}
a=apply(as.matrix(1:10), 1,f)
但是结果只出来一行，[1] 0 1 2 3 4 5 6 7 8 9
用法：assign(x, value, pos = -1, envir = as.environment(pos), inherits = FALSE, immediate = TRUE)
assign函数在循环时候，给变量赋值。
举例说明：
1、
for (i in 1:(length(rowSeq)-1)){
assign(paste("nginx_server_fields7_", i, sep = ""), nginx_server_fields7[(rowSeq[(i-1)+1]):(rowSeq[i+1]), ])
}
2、
for (i in 1:3){
assign(paste("a", i, sep = ""), i:10)
}
ls()
[1] "a1" "a2" "a3" "i"
>a1
[1] 1 2 3 4 5 6 7 8 9 10
>a2
[1] 2 3 4 5 6 7 8 9 10
>a3
[1] 3 4 5 6 7 8 9 10
1、paste函数可用于字符串连接
用法：paste (..., sep = " ", collapse = NULL)，分隔符默认为空格
我们简单举个例子
1）paste("a","b") ##能连接a b
[1] "a b"
paste("a","b","c")
[1] "a b c"
2）设置分隔符paste("a","b",sep="=") ##注意到用等号分隔了
[1] "a=b"
3）连接多个元素paste("a",1:5,sep="") ##会自动每个元素与a相连
[1] "a1""a2""a3""a4""a5"
4）paste("a",1:5,".pdf",sep="") ##比如想批量输出文件名
[1] "a1.pdf""a2.pdf""a3.pdf""a4.pdf""a5.pdf"、
2、collapse参数
谢益辉大佬说这个参数引无数英雄竞折腰啊，大家只会sep
1）paste("a",1,collapse="+") ##注意到了吧，collapse没用上
[1] "a 1"
2）paste(c("a","b","c"),collapse="+") ##这样就很容易理解了，collapse折叠起了元素
[1] "a+b+c"
3）paste("a",1:5,sep="") ##再来更明显的举例
[1] "a1""a2""a3""a4""a5"
4）paste("a",1:5,sep="",collapse="+") ##先在元素间连接，然后折叠
[1] "a1+a2+a3+a4+a5"
3、与paste0函数的区别
paste0函数，默认sep=""是两个函数唯一的区别
paste(c("a","b","c"),1:3)##默认空格符
[1] "a 1""b 2""c 3"
paste(c("a","b","c"),1:3,sep=" ")
[1] "a 1""b 2""c 3"
paste(c("a","b","c"),1:3,sep="")
[1] "a1""b2""c3"
如果两个向量长度不同paste(c("a","b","c"),1:5) ##超出范围后继续从前向后连接
[1] "a 1" "b 2" "c 3" "a 4" "b 5"
paste0(c("a","b","c"),1:3)#默认元素连接为sep=""
[1] "a1""b2""c3"
用法：unlist()函数的作用，就是将list结构的数据du，变zhi成非list的数据，即将list数据变成 字符串向量 或者数字向量的形式
如果是向量的话就直接输出向量
例子：
%in%相当于match()函数的一个缩写。用来判断一个数组或矩阵是否包含在另一个数组或矩阵里。举个例子一目了然：
#首先复制两个变量a和b
>a <- 1:5
>b <- 3:7
>a %in% b #看a的元素是否包含在b中输出结果如下：
[1] FALSE FALSE TRUE TRUE TRUE
用法：apply(x, MARGIN, FUN, ...)
作用：对 矩阵 的行或列使用函数，或者对 数组 的各个维度使用函数
x为数据对象，MARGIN是维度的下标，MARGIN=1表示行，MARGIN=2表示列，FUN是自己指定的任意或自定义函数
注：数据框dataframe也可以使用apply函数，该函数会自动将数据框转化为矩阵，但前提是数据框中各列的数据类型 必须是数值型，否则会报错。
用法：lapply(x,FUN,...)
作用：对列表中的各个元素使用函数
x是格式为列表的数据源，FUN是任意函数。
intersect(data1，data2)：交集
union(data1，data2)：并集
