Berry,
It sounds like you just need a little helper function like this:
ser <- function(x, len=100, f=0.1) {
dr <- extendrange(x, f=f)
return(seq(dr[1L], dr[2L], length.out=len))
}
I called it ser, short for sequence extended range. Use it thusly:
Ijustneed <- ser(D_orig)
Hope this helps. I use and create little help functions like this all the
time. Even extendrange could be considered a helper function as it is only
a couple of lines long.
Dave
On Mon, Feb 3, 2014 at 6:43 AM, Berry Boessenkool <
berryboessenk...@hotmail.com> wrote:
> Hello dear developers,
>
> I find myself often having the result of "range" oder "extendrange", which
> I want to create a sequence with.
> But "seq" needs two seperate arguments "from" and "two".
> Could an argument "range" be added?
>
> Otherwise I will have to create an object with the range (may come from a
> longer calculation), index twice from it and remove it again - kind of an
> unnecessary bunch of code, I think.
>
> Here's an example:
>
> # What I currently do:
> D_orig <- rnorm(20, sd=30)
> D_range <- extendrange(D_orig, f=0.1)
> Ijustneed <- seq(D_range[1], D_range[2], len=100)
> rm(D_range)
>
> # what I'd like to have instead:
> D_orig <- rnorm(20, sd=30)
> Ijustneed <- seq(range=extendrange(D_orig, f=0.1), len=100)
>
> regards,
> Berry
>
> -------------------------------------
> Berry Boessenkool
> Potsdam, Germany
> -------------------------------------
> ______________________________________________
> R-devel@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel
>
[[alternative HTML version deleted]]
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
