Try this:
   
  x <- 1:12
for (i in 1:2){
bb8 = sample(x)
a <- sprintf("whatever%f.txt",i)
write.table(bb8, quote = F, sep = '\t', row.names = F, col.names = F,
file = a)
}

  HTH
   
  Sachin
  
Duncan Murdoch <murdoch@stats.uwo.ca> wrote:
  On 5/22/2006 11:24 AM, Federico Calboli wrote:
> Hi All,
> 
> I need to write as text files 1000 ish variation of the same data frame, 
> once I permute a row.
> 
> I would like to use the function write.table() to write the files, and 
> use a loop to do it:
> 
> for (i in 1:1000){
> 
> bb8[2,] = sample(bb8[2,])
> write.table(bb8, quote = F, sep = '\t', row.names = F, col.names = F, 
> file = 'whatever?????.txt')
> }
> so all the files are called whatever1: whatever1000
> 
> Any idea?

Use the paste() function to construct the name, e.g.

file = paste("whatever",i,".txt", sep="")

Duncan Murdoch

______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html


		
---------------------------------

	[[alternative HTML version deleted]]

