On Wed, Feb 11, 2009 at 2:15 PM, Ben Bolker <bol...@ufl.edu> wrote:
> Bernardo Rangel Tura wrote:
>
>> I think your routine need a little fix
>>
>> x <- rlnorm(1e6,meanlog=1,sdlog=1) ## pick any parameters you like
>> y <- round((x-min(x)/diff(range(x)))*199999+1)
>>
>> What you think?
>
>  Yes.


No.
Bernardo misplaced the parenthesis around (x-min(x))
Correct version is:

x <- rlnorm(1e6,meanlog=1,sdlog=1) ## pick any parameters you like
y <- round((x-min(x))/diff(range(x))*199999+1)


/Gustaf


-- 
Gustaf Rydevik, M.Sci.
tel: +46(0)703 051 451
address:Essingetorget 40,112 66 Stockholm, SE
skype:gustaf_rydevik

______________________________________________
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