Hi
Why not use loops
something like
lll<-vector("list", 100)
for (i in 1:100) lll[[i]] <- yall[sample(1:nrow(yall), 100, replace=FALSE),]
for(i in 1:100) write.csv(lll[[i]], file = paste("yall",i, sep=""))
Regards
Petr
> -----Original Message-----
> From: r-help-boun...@r-project.org [mailto:r-help-bounces@r-
> project.org] On Behalf Of jfrei006
> Sent: Wednesday, September 11, 2013 4:49 PM
> To: r-help@r-project.org
> Subject: [R] Running Loops
>
> I have a data set called yall with 5000 rows, I want to randomly sub
> sample 100 rows 100 times.
> This is what I have so far:
>
> yall<-read.csv("Z:\\SOFTEL\\North Key Largo
> project\\Canopy_Height\\random_age_strat\\Young\\Abv2ft_young.csv")
>
> *yall1 <- yall[sample(1:nrow(yall), 100, replace=FALSE),]
>
> write.csv(yall1, file = "yall1.csv")*
>
> I want to run a loop of the bold script above 100 times, but I want to
> be able to change the name of the sub sample and name of the csv file
> each time. They should be named yall1, yall2,yall3...etc until 100.
>
>
>
> --
> View this message in context: http://r.789695.n4.nabble.com/Running-
> Loops-tp4675886.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> 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.
______________________________________________
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.
