That's a very good idea! Thanks a lot. On Sat, Nov 29, 2008 at 9:13 PM, Gabor Grothendieck <[EMAIL PROTECTED]> wrote: > Try this. First we read it in using fill = TRUE so that > lines with one number get filled out with NAs. The first > line is T so assign first cell to T and create DF0 which > does not have that line. Then split the data into a list > of data frames starting each group at the line with the > NA in column 3. Finally lapply over that list removing > the first row (which is the row that contains NAs). > > Lines <- "3 > 3 > 10000 0 0 > 0 10000 0 > 0 0 10000 > 3 > 5000 0 0 > 0 2000 0 > 0 0 4000 > 5 > 0 1250 0 > 3000 0 3000 > 1000 1000 1000 > 2000 1000 2000 > 1000 3000 2000" > > DF <- read.table(textConnection(Lines), fill = TRUE) > T <- DF[1,1] > DF0 <- DF[-1,] > DFs <- lapply(split(DF0, cumsum(is.na(DF0[,3]))), na.omit) > DFs > > > On Sat, Nov 29, 2008 at 6:51 PM, Hesen Peng <[EMAIL PROTECTED]> wrote: >> Dear R buddies, >> >> This weekend I became interested in solving Google Code Jam problems >> using R. I guess R may work very well in this kind of contests but the >> input of file has been a problem for me. Take this case for example >> (http://code.google.com/codejam/contest/dashboard?c=agdjb2RlamFtchALEghjb250ZXN0cxjRzBQM), >> the files are usually of the form: >> >> A(number of lines for group 1) >> a11 a12 a13 >> a21 a22 a23 >> ... >> B(number of lines for group 2) >> b11 b12 b13 >> b21 b22 b23 >> ... >> >> I guess SAS may work pretty well in this kind of situation with data >> step. But I don't know how to handle them using R. Any suggestions? >> Thanks a lot. >> >> Best wishes, >> -- >> 彭河森 Hesen Peng >> http://hesen.peng.googlepages.com/ >> ______________________________________________ >> 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. >> >
-- 彭河森 Hesen Peng http://hesen.peng.googlepages.com/ ______________________________________________ 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.
