[R] sample

[Rogério Rosa da Silva]

Dear List:

	I have the following simple program:

x<- sample(site)
VarGuilda1<- var(tapply(x,site,func1))
VarGuilda2<- var(tapply(x,site,func2))
VarGuilda3<- var(tapply(x,site,func3))
VarGuilda4<- var(tapply(x,site,func4))
VarGuilda5<- var(tapply(x,site,func5))
VarGuilda6<- var(tapply(x,site,func6))
VarGuilda7<- var(tapply(x,site,func7))
VarGuilda8<- var(tapply(x,site,func8))
VarGuilda9<- var(tapply(x,site,func9))
Var<-cbind(VarGuilda1,VarGuilda2,VarGuilda3,VarGuilda4,VarGuilda5,VarGuilda6,VarGuilda7,VarGuilda8,VarGuilda9)
write(Var,file="LAU_Var_01.txt", ncol=9)

	Every time I want to repeat this I have to change the name of *.txt 
file manually. How can I automate this, so it could be done for all the  
*.txt files (1000) I have to generate.


	Thanks in advance, Rogério

-- 
Rogério R. Silva
MZUSP http://www.mz.usp.br
Linux User #354364
Linux counter http://counter.li.org