Hi, Can't you do something like:
x <- c(1,1,1,1,1,1,0,0,0,0) sample(x, 30, T) Best Wishes, Jenny >X-Spam-Checker-Version: SpamAssassin 3.2.3 (2007-08-08) on hypatia.math.ethz.ch >X-Spam-Level: >X-Spam-Status: No, score=0.0 required=5.0 tests=DKIM_SIGNED, DKIM_VERIFIED, HTML_MESSAGE autolearn=no version=3.2.3 >X-YMail-OSG: sIA8jEAVM1l7INcavAEUFuJk.tlFK1fXrul.GxIEMcxm_vue__YCqQXvo5CFerX5LVHjZDKx7.BqRTj0 zDdTOIevqWu2.u8JP9P2fJkBk9_vTPE.0fORnQ0Oxa9ekA-- >Date: Wed, 3 Oct 2007 12:51:14 +0100 (BST) >From: stat stat <[EMAIL PROTECTED]> >To: [EMAIL PROTECTED] >MIME-Version: 1.0 >X-Virus-Scanned: by amavisd-new at stat.math.ethz.ch >Content-Disposition: inline >Subject: [R] Sample selection problem >X-BeenThere: r-help@r-project.org >X-Mailman-Version: 2.1.9 >List-Id: "Main R Mailing List: Primary help" <r-help.r-project.org> >List-Unsubscribe: <https://stat.ethz.ch/mailman/listinfo/r-help>, <mailto:[EMAIL PROTECTED]> >List-Archive: <https://stat.ethz.ch/pipermail/r-help> >List-Post: <mailto:r-help@r-project.org> >List-Help: <mailto:[EMAIL PROTECTED]> >List-Subscribe: <https://stat.ethz.ch/mailman/listinfo/r-help>, <mailto:[EMAIL PROTECTED]> >Content-Transfer-Encoding: 7bit >X-MSSL-MailScanner-Information: Please contact the ISP for more information >X-MSSL-MailScanner: No virus found >X-MSSL-MailScanner-SpamCheck: not spam, SpamAssassin (score=-3.906, required >5, BAYES_00 -4.90, FROM_ENDS_IN_NUMS 0.99) > >I want to get a sample of some arbitrary size from a population having only >two values 0 and 1 with replacement, but with different probability for selection. For example 0 will be selected with probability 0.4 and 1 with 0.6. I could use sample function i.e. sample(c(0,1), 30, T) to get this, however here, selection of either 0 or 1 has equal probability here. I am looking for a function which can do the same thing but with different probabilities. > >--------------------------------- > Meet people who discuss and share your passions. Join them now. > [[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. ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Jennifer Barnes PhD student: long range drought prediction Climate Extremes Group Department of Space and Climate Physics University College London Holmbury St Mary Dorking, Surrey, RH5 6NT Tel: 01483 204149 Mob: 07916 139187 Web: http://climate.mssl.ucl.ac.uk ______________________________________________ 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.
