Dear all, I have a problem with a loop, if anyone has any knowledge on these things I would appreciate some comments. The code below is designed to allow me to extract the top record of the data frame, and them remove rows from the data frame which have an index close to the extracted top record.
topstorm<-subset(rankeddataset[1,]) ## Extracts the top storm topstormindex<-rankeddataset[1,1] ## Finds the top storm start index startindex<-topstormindex-48 ## sets the start and end indexes endindex<-topstorminde+48 rankeddataset<-rankeddataset[-1,] ## Creates a new list with the top storm removed ##This section of code needs looped. It removes storms from the list which are too close to the extracted storm for (i in 1:30){ if (rankeddataset[i,1]>startindex && rankeddataset[i,1]<endindex) {rankeddataset<-rankeddataset[-i,]} } Here is some example data: 82856 15 / 6 / 1966 82856:82879 25.9 82857 15 / 6 / 1966 82857:82880 20.5 83036 23 / 6 / 1966 83036:83059 17.3 87250 15 / 12 / 1966 87250:87273 15.9 The loop does not currently work, it seems to remove every second line or so. Can anyone suggest why this might be, I'm not particularly experienced in using loops so it may be a rookie mistake. Thanks in advance. Jamie Ledingham ______________________________________________ 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.