[R] Problem with sequence in loop

[Muhammad Rahiz]

Hi all,

I've got a list of files from 1914 to 2000. For each file, I can call the read.table function as follows.

> file <- read.table("1914.txt")


But I want to make a script so that at the end of the loop, the script selects the file 1915.txt, 1916.txt and so on.

I've used seq() to create the increment

seq <- paste(seq(1914, 2006, by=1), "*.txt.h", sep=".")

But it didn't work.

Below is the script;

seq <- paste(seq(1914, 2006, by=1), "*.txt", sep=".")

for (i in 1:93){
list <- list.files("~/ukcp09/txt/x.djf", seq)
file <- lapply(list, read.table)

mean <- (Reduce("+", file))/3
}

When I call

 > objects()
 > list
[1] "2006.01.txt.h" "2006.02.txt.h" "2006.12.txt.h"

The listed files are the last files in the sequence.

Am I doing the loop correctly?

-- 
Muhammad Rahiz  |  Doctoral Student in Regional Climate Modeling					
Climate Research Laboratory, School of Geography & the Environment	
Oxford University Centre for the Environment
South Parks Road, Oxford, OX1 3QY, United Kingdom 
Tel: +44 (0)1865-285194	 Mobile: +44 (0)7854-625974
Email: muhammad.rahiz at ouce.ox.ac.uk