Thanks Dave!
I settled on something similar, but more general, for my function collection
package.
I just thought this could be wanted by more people and thus interesting for
base::seq.
In case anyone is interested in my solution, keep reading.
Berry
# Add a range argument to seq
seqr <- fun
ustneed <- 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)
reg
pondering, and again: R ist the most beautiful thing I
discovered in the last three years.
Keep up the good work!
Berry
-----
Berry Boessenkool
University of P