Hi, con<-file("Rout1112.text") Lines1<- readLines(con) close(con) indx<-rep(rep(c(TRUE,FALSE),each=2),2) Lines2<-Lines1[!grepl("[A-Za-z]",Lines1)]
res<-read.table(text=paste(gsub("^\\d+\\s+","",Lines2[indx]),gsub("^\\d+\\s+","",Lines2[!indx])),sep="",header=FALSE) nm1<-unlist(strsplit(gsub("^ +","",paste(Lines1[grepl("[A-Za-z]",Lines1)][1:2],collapse=" "))," ")) colnames(res)<- nm1[nm1!=""] res #m1 n1 m n cterm1_P0L cterm1_P0H c11 c12 c1 c2 alpha beta T_error N #1 4 5 11 9 0.8145062 0.6302494 0.03 0.03 0.15 0.15 0.1 0.4 0.6339515 20 #2 7 4 11 8 0.6983373 0.0000000 0.03 0.03 0.15 0.15 0.1 0.4 0.4899431 19 #3 4 5 10 9 0.8145062 0.6302494 0.03 0.03 0.15 0.20 0.1 0.4 0.6831988 19 #4 5 4 9 8 0.7737809 0.0000000 0.03 0.03 0.15 0.20 0.1 0.4 0.6458095 17 # EN BH BL AH AL #1 11.77746 0.12159579 0.3846999 0.09567271 0.03198315 #2 16.20665 0.09819012 0.2550532 0.09581478 0.04088503 #3 11.59196 0.15166360 0.3943098 0.08405337 0.05317206 #4 13.90488 0.14031630 0.3624458 0.08268336 0.06036395 A.K. ________________________________ From: Joanna Zhang <zjoanna2...@gmail.com> To: arun <smartpink...@yahoo.com> Sent: Thursday, March 21, 2013 3:03 PM Subject: Re: [R] cumulative sum by group and under some criteria Hi, I used a computer cluster and output the file attached here, I need to read the file in R. I tried to use read.table, but it seems that the format is not recognized by R, could you help? ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.