On 5/14/07, Martin Maechler <[EMAIL PROTECTED]> wrote:
> Hi Henrik,
> >>>>> "HenrikB" == Henrik Bengtsson <[EMAIL PROTECTED]>
> >>>>> on Sun, 13 May 2007 21:14:24 -0700 writes:
>
> HenrikB> Hi,
> HenrikB> I've got a version of rowMedians(x, na.rm=FALSE) for matrices
> that
> HenrikB> handles missing values implemented in C. It has been optimized
> for
> HenrikB> memory and speed. To avoid coercing integers to doubles, and
> hence
> HenrikB> allocate an additional 200% memory, there is one C function for
> HenrikB> integers and one for doubles.
>
> HenrikB> The rowMedians() implementation is currently sitting in my
> non-CRAN
> HenrikB> package R.native available by:
>
> HenrikB> source("http://www.braju.com/R/hbLite.R";)
> HenrikB> hbLite("R.native")
> HenrikB> library(R.native)
> HenrikB> example(rowMedians)
>
> HenrikB> The source code package is available at:
>
> HenrikB> http://www.braju.com/R/repos/R.native_0.1.2.tar.gz
>
> HenrikB> Before I submit a package to CRAN consisting of pretty much just
> HenrikB> rowMedians(), would it make more sense for it to go into one of
> the
> HenrikB> core packages? If so, how should I proceed?
>
> As they say: You have to convince at least one member of R-core
> that ``it's worth it''. {Then he may have to bear the battle
> with dissenting core members ;- }
>
> I'm quite interested, but really you have to do the work of unbundling
> it from all the R.oo stuff before I have another longer look.
Great. The R code without R.oo (that's what it does), will be
rowMedians.matrix <- function(x, na.rm=FALSE, ...) {
.Call("rowMedians", x, as.logical(na.rm), PACKAGE="R.native");
}
rowMedians <- function(...) UseMethod("rowMedians", ...)
and the C code is in src/rowMedians.c, and the doc in
man/rowMedians.matrix.R (all in
http://www.braju.com/R/repos/R.native_0.1.2.tar.gz).
Thanks
Henrik
PS. I'll be off email until Friday (US time). DS.
>
> Martin
>
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
