Re: [R] Read text file in R

HI, Just a correction: indx<-rep(rep(c(TRUE,FALSE),each=2),23) A.K. - Original Message - From: arun To: Joanna Zhang Cc: R help Sent: Thursday, March 28, 2013 11:38 AM Subject: Re: [R] Read text file in R con<-file("RRoutall.txt")  Lines1<- readLines(con)  close

Re: [R] Read text file in R

con<-file("RRoutall.txt")  Lines1<- readLines(con)  close(con) indx<-rep(rep(c(TRUE,FALSE),each=2),22) Lines2<-Lines1[!grepl("[A-Za-z]",Lines1)] res<-read.table(text=paste(gsub("^\\s+","",Lines2[indx]),gsub("^\\s+","",Lines2[!indx])),sep="",header=FALSE) nm1<-unlist(strsplit(gsub("^ +","",paste(L

Re: [R] Read text file in R

res[res$EN==min(res$EN),] #   m1 n1  m  n cterm1_P0L cterm1_P0H  c11  c12   c1   c2 alpha beta   T_error #25  9  4 13 12  0.6302494  0.7565041 0.03 0.07 0.15 0.15   0.1  0.2 0.4403712 #27  9  4 13 12  0.6302494  0.7565041 0.03 0.07 0.15 0.20   0.1  0.2 0.4473437 #33  9  4 13 12  0.6302494  0.7565

Re: [R] Read text file in R

Hi, Try this: con<-file("Routallnew.txt")  Lines1<- readLines(con)  close(con) indx<-rep(rep(c(TRUE,FALSE),each=2),24) Lines2<-Lines1[!grepl("[A-Za-z]",Lines1)] res<-read.table(text=paste(gsub("^\\s+","",Lines2[indx]),gsub("^\\s+","",Lines2[!indx])),sep="",header=FALSE) nm1<-unlist(strsplit(gsub("^