i1<-regexpr("[\b太阳\b]",x)+2
i2<-regexpr("[\b月亮\b]",x)-1
substr(x,i1,i2)
先读进去比如:data=read.table(fileName,header=T), 然后直接用data[1]和data[3]就可以分别渠道地1列,第三列。如果想要同时取出这两列可以用data[c(1,3)],也可以取出来之后再和并cbind(data[1],data[3]). 这些只是我自己想的,都能实现但不一定是最佳方案。。i1<-regexpr("[\b太阳\b]",x)+2
i2<-regexpr("[\b月亮\b]",x)-1
substr(x,i1,i2)
先读进去比如:data=read.table(fileName,header=T), 然后直接用data[1]和data[3]就可以分别渠道地1列,第三列。如果想要同时取出这两列可以用data[c(1,3)],也可以取出来之后再和并cbind(data[1],data[3]). 这些只是我自己想的,都能实现但不一定是最佳方案。。