求助：如何将数据框的每列变量按固定长度拆分为两列？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

我的数据是这样的共有54001个变量，需要把V1到V54001都拆分为两个变量即A和G。该怎么拆分呢？strsplit怎么用？谢谢指导
数据如图所示。请各位指导下该怎么写命令呢，谢谢了。我自己写的batch6<-strsplit(batch5[1:54001],")报错了，能帮我修改下吗？再次感谢

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：数据框 Batch split ATCH 如图所示 如何

substr(文本,起始位置,结束位置)   用于截取指定位置文本


data <- matrix(c("as","sa","da","fa","ds","ds","","fc","cs"),ncol=3)
m <- nrow(data); ##记录数据矩阵行数
data1 <- vector("character",length=length(data)) ##初始化左字符矩阵
data2 <- vector("character",length=length(data))  ##初始化右字符矩阵
for(i in 1:length(data)){
   if(nchar(data[i])==2){  ##字符串长度为2时执行，否则为空
    data1[i] <- substr(data[i],1,1) ##substr(文本,起始位置,结束位置) 截取文本
    data2[i] <- substr(data[i],2,2)
  }
} #左字符存在data1，右字符存在data2
data1 <- data.frame(matrix(data1,nrow=m))
data2 <- data.frame(matrix(data2,nrow=m))
   

万人往LVR 发表于 2015-7-15 12:00
substr(文本,起始位置,结束位置)   用于截取指定位置文本

谢谢哈，但是这个不是我想要的结果。我只是想把每个变量拆分为两列，但还得放在一个数据框内。

我都拆好了你自己放不就完了

万人往LVR 发表于 2015-7-15 16:10
我都拆好了你自己放不就完了

谢谢！