R 语言assign 和get 函数用法

assign函数在循环时候，给变量赋值，算是比较方便

1、给变量赋值

 

[plain]  view plain  copy

 

 

1. for (i in 1:(length(rowSeq)-1)){  
2.   assign(paste("nginx_server_fields7_", i, sep = ""), nginx_server_fields7[(rowSeq[(i-1)+1]):(rowSeq[i+1]), ])  
3. }  

 

2、通过for循环给变量a1、a2、a3赋值

 

[plain]  view plain  copy

 

 

1. for (i in 1:3){  
2.     assign(paste("a", i, sep = ""), i:10)  
3. }  
4.   
5. ls()  
6. [1] "a1" "a2" "a3" "i"  
7.   
8. > a1  
9.  [1]  1  2  3  4  5  6  7  8  9 10  
10. > a2  
11. [1]  2  3  4  5  6  7  8  9 10  

 

3、get和assign联合用法

 

[plain]  view plain  copy

 

 

1. 1. rm(list = ls())  #这个命令千万慎重使用  
   2. for(i in 1:3){  
   3.      assign(paste("p", i, sep=""), i)  
   4.      tmp <- get(paste("p", i, sep=""))  
   5.      print(tmp)  
   6.  }  
   7. [1] 1  
   8. [1] 2  
   9. [1] 3  
   10.  ls()  
   11. [1] "i"   "p1"  "p2"  "p3"  "tmp"  

转载于:https://www.cnblogs.com/to-creat/p/6229962.html