Re: [R] Running Loops

2013-09-12 Thread PIKAL Petr
-- > 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 > sam

[R] Running Loops

2013-09-11 Thread jfrei006
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),] wr

Re: [R] Running Loops

2013-09-11 Thread arun
Hi, Try: set.seed(24) yall<- as.data.frame(matrix(sample(1:1e5,5000*10,replace=FALSE),ncol=10))  set.seed(49)   lst1<-replicate(100,yall[sample(1:nrow(yall),100,replace=FALSE),],simplify=FALSE)  names(lst1)<- paste0("yall",1:100) lapply(seq_along(lst1),function(i) write.csv(lst1[[i]],file=paste0