Graves, Gregory
2011-May-24 12:30 UTC
[R] how to eliminate first row in datafile created in do loop
I am trying to create a routine that would take a time series and generate monthly 25%tile and 75%tile limits based on 12 calendar months. I have succeeded to create a do loop to do this, but can't figure out how to initiate the receiving datafile (in this case "limit.list") without sticking an initial set of zeroes in. I'd like to be able to insert a new column "i.value" for each time "i" increments 1 thru 12, to represent the 12 months, but I can't figure out how to join the value of i to the "lower" and "upper" variables. Close but no cigar here. lower=0 upper=0 limit.list<-data.frame(lower,upper) for(i in 1:12){ s=subset(paleo,month==i); one.month=with(s, quantile(WBpaleo, c(.25, .75), na.rm=T)); limit.list<-rbind(limit.list,one.month) } limit.list which gives me this:> limit.listlower upper 1 0.00000 0.00000 2 25.51786 29.68823 3 26.09828 30.92770 4 27.75703 33.04016 5 29.53395 36.14273 6 30.89420 37.65727 7 29.27843 37.59690 8 27.50141 34.36265 9 26.40554 32.88533 10 25.13494 29.83829 11 23.48982 27.14612 12 22.88814 27.52782 13 24.51789 28.24871 How do I avoid having row 1 in my list? I can delete the first row with: limit.list = limit.list[-1,] but that messes up my month variable> limit.listlower upper 2 25.51786 29.68823 3 26.09828 30.92770 4 27.75703 33.04016 5 29.53395 36.14273 6 30.89420 37.65727 7 29.27843 37.59690 8 27.50141 34.36265 9 26.40554 32.88533 10 25.13494 29.83829 11 23.48982 27.14612 12 22.88814 27.52782 13 24.51789 28.24871
Ian Gow
2011-May-24 12:57 UTC
[R] how to eliminate first row in datafile created in do loop
Gregory: Would setting limit.list <- NULL at the start do the trick? See example below: Analogue of your example: lower <- 0 upper <- 0 limit.list<-data.frame(lower,upper) for(i in 1:12) { some.data <- rnorm(2) lower <- min(some.data) upper <- max(some.data) one.month <- data.frame(lower, upper) limit.list <- rbind(limit.list, one.month) } limit.list Approach that doesn't give zeroes at the start: limit.list <- NULL for(i in 1:12) { some.data <- rnorm(2) lower <- min(some.data) upper <- max(some.data) one.month <- data.frame(lower, upper) limit.list <- rbind(limit.list, one.month) } limit.list -Ian On 5/24/11 7:30 AM, "Graves, Gregory" <ggraves at sfwmd.gov> wrote:>I am trying to create a routine that would take a time series and >generate monthly 25%tile and 75%tile limits based on 12 calendar months. >I have succeeded to create a do loop to do this, but can't figure out >how to initiate the receiving datafile (in this case "limit.list") >without sticking an initial set of zeroes in. I'd like to be able to >insert a new column "i.value" for each time "i" increments 1 thru 12, to >represent the 12 months, but I can't figure out how to join the value of >i to the "lower" and "upper" variables. Close but no cigar here. > >lower=0 >upper=0 >limit.list<-data.frame(lower,upper) >for(i in 1:12){ > s=subset(paleo,month==i); > one.month=with(s, quantile(WBpaleo, c(.25, .75), na.rm=T)); > limit.list<-rbind(limit.list,one.month) >} >limit.list > >which gives me this: >> limit.list > lower upper >1 0.00000 0.00000 >2 25.51786 29.68823 >3 26.09828 30.92770 >4 27.75703 33.04016 >5 29.53395 36.14273 >6 30.89420 37.65727 >7 29.27843 37.59690 >8 27.50141 34.36265 >9 26.40554 32.88533 >10 25.13494 29.83829 >11 23.48982 27.14612 >12 22.88814 27.52782 >13 24.51789 28.24871 > >How do I avoid having row 1 in my list? > >I can delete the first row with: >limit.list = limit.list[-1,] > >but that messes up my month variable > >> limit.list > lower upper >2 25.51786 29.68823 >3 26.09828 30.92770 >4 27.75703 33.04016 >5 29.53395 36.14273 >6 30.89420 37.65727 >7 29.27843 37.59690 >8 27.50141 34.36265 >9 26.40554 32.88533 >10 25.13494 29.83829 >11 23.48982 27.14612 >12 22.88814 27.52782 >13 24.51789 28.24871 > >______________________________________________ >R-help at 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.