On Tue, Oct 19, 2010 at 11:30 AM, <richard.cot...@hsl.gov.uk> wrote: > > x <- c(1, 2, 3) > > n <- 10 > > ## so using the recycling rules, I would like to get from FUN(x, n)==1 > > ## I am doing: > > xRecycled <- rep(x, length.out=n)[n] > > > > This works, but it seems to me that I am missing something really basic > here > > - is there more straightforward way of doing this? > > x[n %% length(x)] gives you the same answer as rep(x, length.out=n)[n], > without having to create the longer vector. >
Thanks a lot - works perfectly and looks much nicer, Rainer > > Regards, > Richie. > > Mathematical Sciences Unit > HSL > 4D Pie Charts > > > > ------------------------------------------------------------------------ > ATTENTION: > > This message contains privileged and confidential information intended > for the addressee(s) only. If this message was sent to you in error, > you must not disseminate, copy or take any action in reliance on it and > we request that you notify the sender immediately by return email. > > Opinions expressed in this message and any attachments are not > necessarily those held by the Health and Safety Laboratory or any person > connected with the organisation, save those by whom the opinions were > expressed. > > Please note that any messages sent or received by the Health and Safety > Laboratory email system may be monitored and stored in an information > retrieval system. > ------------------------------------------------------------------------ > Think before you print - do you really need to print this email? > ------------------------------------------------------------------------ > > ------------------------------------------------------------------------ > Scanned by MailMarshal - Marshal's comprehensive email content security > solution. Download a free evaluation of MailMarshal at www.marshal.com > ------------------------------------------------------------------------ > -- NEW GERMAN FAX NUMBER!!! Rainer M. Krug, PhD (Conservation Ecology, SUN), MSc (Conservation Biology, UCT), Dipl. Phys. (Germany) Centre of Excellence for Invasion Biology Natural Sciences Building Office Suite 2039 Stellenbosch University Main Campus, Merriman Avenue Stellenbosch South Africa Cell: +27 - (0)83 9479 042 Fax: +27 - (0)86 516 2782 Fax: +49 - (0)321 2125 2244 email: rai...@krugs.de Skype: RMkrug Google: r.m.k...@gmail.com [[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.