Re: [R] arbitrary scaling

2010-03-09 Thread Jim Lemon
On 03/09/2010 01:37 AM, Petr PIKAL wrote: Hi all I know I probably reinvented wheel but it was maybe simpler then search in docs or ask help before I did my part. I made a simple function which can scale a vector between chosen values. Do anybody know simpler/better approach? ... x<- c(5,30,50)

Re: [R] arbitrary scaling

2010-03-08 Thread Petr PIKAL
Thanks I would never deduct it out from the help page of approx. Regards Petr r-help-boun...@r-project.org napsal dne 08.03.2010 15:47:37: > Perhaps approx: > >approx(range(x), c(0.5, 1), xout = x)$y > > A one-linear, but longer, is also possible based on lm: > > predict(lm(c(0.5, 1)

Re: [R] arbitrary scaling

2010-03-08 Thread Gabor Grothendieck
Perhaps approx: approx(range(x), c(0.5, 1), xout = x)$y A one-linear, but longer, is also possible based on lm: predict(lm(c(0.5, 1) ~ x, data.frame(x = range(x))), data.frame(x)) On Mon, Mar 8, 2010 at 9:37 AM, Petr PIKAL wrote: > Hi all > > I know I probably reinvented wheel but it was

[R] arbitrary scaling

2010-03-08 Thread Petr PIKAL
Hi all I know I probably reinvented wheel but it was maybe simpler then search in docs or ask help before I did my part. I made a simple function which can scale a vector between chosen values. Do anybody know simpler/better approach? myscale<-function(x, miny=0.5, maxy=1) { rx <- diff(range(