R語言：構(gòu)造新序列

1、數(shù)值構(gòu)造函數(shù)rep與seq
[plain] view plain copy
print?在CODE上查看代碼片派生到我的代碼片
    #數(shù)值構(gòu)造rep與seq  
    rep(1:4,each=2)#依次重復(fù)1:4兩遍  
    rep(1:4,2)  #注意，重復(fù)1:4兩遍  
    seq(from=3,to=5,by=0.2)  
 
    rep(seq(from=3,to=5,by=0.2),2) #混合使用 
rep在使用過程中也很靈活，each代表AABB；默認(rèn)的為ABAB。
[plain] view plain copy
print?在CODE上查看代碼片派生到我的代碼片
    > rep(c("id","use"),list(2,3))  
    [1] "id"  "id"  "use" "use" "use"  
    > rep(c("id","use"),each=2)  
    [1] "id"  "id"  "use" "use"  
    > rep(c("id","use"),2)  
    [1] "id"  "use" "id"  "use"  
    > rep(c("id","use"),unlist(2,3))  
    [1] "id"  "use" "id"  "use" 
rep與list相結(jié)合
[plain] view plain copy
print?在CODE上查看代碼片派生到我的代碼片
    > rep(c("id","use"),list(2,3))  
    [1] "id"  "id"  "use" "use" "use" 
可以實(shí)現(xiàn)AABBB，與each相似。在構(gòu)造一些序列時(shí)候十分好用。
2、矩陣構(gòu)造
[plain] view plain copy
print?在CODE上查看代碼片派生到我的代碼片
    #構(gòu)造矩陣  
    matrix(1:15,nrow=3,ncol=5,byrow=T)  #byrow按行的順序（橫向）賦值；bycol按列（豎）賦值  
    array(1:15,dim=c(3,5)) #只能按列（豎）賦值 
3、字符構(gòu)造paste
seq代表是ck與數(shù)值1 之間用啥記號(hào)，如：ck_1,ck*2
collapse代表是ck1與ck2之間用啥記號(hào)如：ck1_ck2   ck1 * ck2
[plain] view plain copy
print?在CODE上查看代碼片派生到我的代碼片
    #字符構(gòu)造paste 
    paste("CK", 1:6, sep="")        
    paste("CK", 1:6, sep="*")         #對比 
    paste("CK", 1:6,collapse ="")   
    paste("CK", 1:6,collapse = "_")   #對比  
    #seq代表是ck與數(shù)值1 之間用啥記號(hào)，如：ck_1,ck*2  
    #collapse代表是ck1與ck2之間用啥記號(hào)如：ck1_ck2   ck1 * ck2 
4、paste與list合用——批量處理
list能夠很好與paste函數(shù)應(yīng)用起來
[plain] view plain copy
print?在CODE上查看代碼片派生到我的代碼片
    #paste與list合用  
    x <- list(a="aaa", b="bbb", c="ccc")   
    y <- list(d=1, e=2)   
    z=paste(x, y, sep="-")  
    paste("T", z, sep=":")   
    #list能夠很好與paste函數(shù)應(yīng)用起來 
兩者在批量處理之中的運(yùn)用，可見博客:R語言︱list用法、批量讀取、寫出數(shù)據(jù)時(shí)的用法
[plain] view plain copy
print?在CODE上查看代碼片派生到我的代碼片
    #3、利用List批量讀出操作  
    #難點(diǎn)：如果構(gòu)造輸出表格的名稱——paste來構(gòu)造名稱  
    flie=list()  
    xlsxflie=paste(1:2,".xlsx",sep="")  
      
    for(i in 1:2){  
    flie[[i]]=paste("C:/Users/long/Desktop/",xlsxflie[i],sep="")  
    write.xlsx(data.list2[[i]],file)  
    } 
其中，代碼可以實(shí)現(xiàn)，數(shù)據(jù)寫出時(shí)候，批量按照一定格式進(jìn)行命名。