Re: [R] Loop stopping after 1 iteration

From: Martyn Byng <Martyn.Byng_at_nag.co.uk>
Date: Wed, 18 May 2011 16:31:03 +0100

Hi,

The answer to (2) is that num_obs is a scalar, so length(num_obs) is 1.

You probably wanted to do

for (i in 1:num_obs)

instead.

Best wishes

Martyn

-----Original Message-----
From: r-help-bounces_at_r-project.org [mailto:r-help-bounces_at_r-project.org] On Behalf Of armstrwa
Sent: 18 May 2011 16:18
To: r-help_at_r-project.org
Subject: [R] Loop stopping after 1 iteration

Hi all,

This is a very basic question, but I just can't figure out why R is handling
a loop I'm writing the way it is.

Here is the script I have written:

grid_2_series<-function(gage_handle,data_type,filename)

series_name<-paste(gage_handle,data_type,sep="_") data_grid<-read.table(file=paste(filename,".txt",sep=""))

num_rows_data<-nrow(data_grid)-1
num_cols_data<-ncol(data_grid)-4
num_obs<-num_rows_data*num_cols_data

time_series<-matrix(nrow=0,ncol=2)

for(i in 1:length(num_obs)){

	rownum<-ceiling(i/31)+1
	colnum<-if(i%%31==0){
			35

}else{
(i%%31)+4
}
year<-data_grid[rownum,2] month<-data_grid[rownum,3] day<-colnum-4 date_string<-paste(month,day,year,sep="/") date<-as.Date(date_string,format='%m/%d/%Y') value<-as.character(data_grid[rownum,colnum]) time_series<-rbind(time_series,c(date,value))
}

The script is working as I intended it to (goes through a matrix of data where column 2 is the year, column 3 is the month, and row 1 columns 5-35
are the day of the month the observation was recorded [I have included a screenshot below to help visualize what I'm talking about] and converts the
grid into a 2 column time series where column 1 is the date and column 2 is
the value of the observation), but it is stopping after only 1 iteration.

nabble_img src="matrix_screenshot.jpg" border="0"/>

Two questions:

1.) Does anyone know of an existing function to accomplish this task? 2.) Why is the loop stopping after 1 iteration? I have it written to iterate up to the total number of observations (20,615 in one case).

Thank you for your help and sorry for this question which I'm sure has a very simple answer.

Thanks again,

Billy<

--
View this message in context:
http://r.789695.n4.nabble.com/Loop-stopping-after-1-iteration-tp3532988p
3532988.html
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
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.

________________________________________________________________________
This e-mail has been scanned for all viruses by Star.\ _...{{dropped:12}}

______________________________________________
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.
Received on Wed 18 May 2011 - 15:33:04 GMT

This quarter's messages: by month, or sorted: [ by date ] [ by thread ] [ by subject ] [ by author ]

All messages

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Wed 18 May 2011 - 15:40:08 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.

list of date sections of archive