【无标题】R语言对100列字符串进行串联拼接合并

在运用R语言对于较少列数据进行合并时，执行代码较简单运用paste()函数进行拼接即可。

#对数据集datajbxx中的a和b两个字段进行拼接，生成新字段c。
datajbxx$c<-paste(datajbxx$a,datajbxx$b,sep="")

#对数据集datajbxx中的a和b和c三个字段进行拼接，生成新字段d。
datajbxx$d<-paste(datajbxx$a,datajbxx$b,datajbxx$c,sep="")

当列数较多时，例如100列数据进行拼接合并成一列，再采取上述代码模式书写代码就太冗长了。可以采用循环语句进行执行字段拼接。for()语句执行纵向顺序，内嵌while语句执行每一行的100个字段的数据拼接。

#拼接连续一百个字段为一个字段。
datajbxx$digT<-""
for (i in 1 : length(datajbxx$id)) {
  j<-3                                            #拼接起始字段序号
  while (j<=102){                                 
    datajbxx$digT[i]<-paste(datajbxx$digT[i],datajbxx[i,j],sep = "")
    j=j+1
    if(j>102){
      break
    }
  }
}