Andrija,

Thank you very much this worked very well and i was also able to calculate the 
Mann-Whitney test and the confidence intervals using the wilcox test. 












--- On Thu, 3/10/11, andrija djurovic <djandr...@gmail.com> wrote:

From: andrija djurovic <djandr...@gmail.com>
Subject: Re: [R] Fw: random sampling steps in R with replacement
To: "taby gathoni" <tab...@yahoo.com>
Cc: "R help" <r-help@r-project.org>
Date: Thursday, March 10, 2011, 12:05 PM

Hi Taby,
 
this is not best solution for sure but it will give you, maybe, some ideas :)
I am also looking forward to see other solutions.
 
data<-data.frame(id=1:(165+42),x=rep(c("male","female"),c(42,165)))
f<-function(x) {
str.sample<-list()
for (i in 1:length(levels(x$x)))
{
str.sample[[i]]<-x[x$x==levels(x$x)[i] 
,][sample(tapply(x$x,x$x,length)[i],20,rep=T),]

}
strat.sample<-do.call("rbind",str.sample)
return(strat.sample)
}
f(data)
repl<-list()
for(i in 1:1000)
{
repl[[i]]<-f(data)
}
repl

 
Andrija 


On Thu, Mar 10, 2011 at 10:04 AM, taby gathoni <tab...@yahoo.com> wrote:

Please note is with replacement



From: taby gathoni <tab...@yahoo.com>

To: R help <r-help@r-project.org>
Sent: Thursday, March 10, 2011 11:53 AM
Subject: [R] random sampling steps in R

Dear all,

Could someone assist me in random sampling steps/code in R? I have a main 
sample  of  42 males and 165 females and I want to come up with about 1000 
samples of 20 males and 20 females from this main sample. While at it, i would 
also like to come up Accuracy  Ratios (ARs) with corresponding confidence 
intervals.


Please assist.


Thanks so much,

Taby



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



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





      
        [[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