在运用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
}
}
}