[Rcpp-devel] R vectorisation vs. C++ vectorisation

Alexandre Bujard alexandre.bujard at gmail.com
Mon Nov 19 19:02:22 CET 2012


ohh nice!

But still, I don't understand why you consider pmin and pmax as primitives?

Even if they are part of the base package it's not right to consider them
as primitive of the R language!

You can check:
.Primitive('pmax')

It will give you an error!




On Mon, Nov 19, 2012 at 6:36 PM, Hadley Wickham <h.wickham at gmail.com> wrote:
>
> > To be fair with the R language, I would have compare with the use of
real
> > primitives :
> >
> > vaccBubu <- function(age, female, ily) {
> >     gender <- female * 1.25
> >     gender[!female] <- 0.75
> >     p <- (0.25 + 0.3 * 1 / (1 - exp(0.04 * age)) + 0.1 * ily) * gender
> >     p[p < 0] <- 0
> >     p[p > 1] <- 1
> >     p
> > }
> >
>
> I think you could do it a bit more elegantly with
>
> gender <- 0.75 + female * 0.5
>
> but pmin and pmax are "real" primitives, so I think it's fine to use them.
>
> Hadley
>
>
> --
> RStudio / Rice University
> http://had.co.nz/
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.r-forge.r-project.org/pipermail/rcpp-devel/attachments/20121119/81b7cdac/attachment.html>


More information about the Rcpp-devel mailing list