Not sure exactly what you mean by, “ writing a table with several rows per 
file”.

If what you want to do is write output to an external file, adding to it as 
your loop progresses, then look at the functions
  sink()
  cat()
And their ‘file’ and ‘append’ arguments.

If what you want to do is append rows to a table within R, as your loop 
progresses, then see the
   rbind()
function.

-Don

On 1/26/11 2:51 AM, "clemens karwautz" <clemd...@gmx.net> wrote:

I’m running a loop opening one file after another. >setwd("D:/Documents and 
Settings/trflp") >a<-list.files() 
>results.diversity<-data.frame(matrix(0,ncol=7,nrow=length(a))) 
>names(results.diversity)<-c("file","simpson","shannon","eveness") 
>x<-length(a) >for (i in 1:x){ > trflp<-read.table(a[i],header=T,sep="\t") … I 
was able to make a table with the results of my calculations for each file. 
>results.diversity$simpson[i]<-simpson >results.diversity$shannon[i]<-shannon 
>results.diversity$eveness[i]<-eveness 
>write.table(results.diversity,"diversity.txt",row.names=F,sep="\t") Now, I 
would be interested in writing a table with several rows per file. e.g.: file1: 
size abundance 37 0.0117 43 0.1566 218 0.0682 253 0.0508 412 0.0874 ... file2: 
size abundance 37 0.0117 45 0.1876 218 0.0682 255 0.0808 417 0.0374 ... Final 
table: size abundance filename 37 0.0117  file1 43 0.1566  file1 218 0.0682  
file1 253 0.0508  file1 412 0.0874  file1 37 0.0117  file2 45 0.1876  file2 218 
0.0682  file2 255 0.0808  file2 417 0.0374  file2 Could you give me some advise 
how to manage this problem? Thank you very much Clemens -- GMX DSL Doppel-Flat 
ab 19,99 Euro/mtl.! Jetzt mit gratis Handy-Flat! 
http://portal.gmx.net/de/go/dsl ______________________________________________ 
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.

--
Don MacQueen
Environmental Protection Department
Lawrence Livermore National Laboratory
925 423-1062

        [[alternative HTML version deleted]]

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

Reply via email to