assign和get函数用于赋值和取值

assign函数：在循环时候，常用于给变量赋值。

#用法：
assign(x, value, pos = -1, 
 envir = as.environment(pos),
 inherits = FALSE, 
 immediate = TRUE)

#例子：
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

get函数：在循环的时候，用于通过变量名提取其对应的数据

#用法：
get(x)

#例子
for(i in 1:3){
     assign(paste("p", i, sep=""), i)
     tmp <- get(paste("p", i, sep=""))
     print(tmp)
}
#[1] 1
#[1] 2
#[1] 3
ls()
#[1] "i"   "p1"  "p2"  "p3"  "tmp"