[R-pkg-devel] Forward function call

Ben Bolker bbo|ker @end|ng |rom gm@||@com
Mon Jun 8 21:42:27 CEST 2020


 I think quote(survival::coxph) will work in place of as.name() ?

On Mon, Jun 8, 2020 at 3:12 PM Göran Broström <goran.brostrom using umu.se> wrote:
>
> Hello,
>
> the function 'coxreg' in my package 'eha' is often just a wrapper for
> 'coxph' in survival, so I have code like
>
>      if (cox.ph){
>          Call <- match.call()
>          Call[[1]] <- as.name("coxph")
>          fit <- eval.parent(Call)
>          return(fit)
>      }
>
> which works since eha depends on survival. Now I am thinking of changing
> Depends to Imports, and I would like to change the code to
>
>      if (cox.ph){
>          Call <- match.call()
>          Call[[1]] <- as.name("survival::coxph")
>          fit <- eval.parent(Call)
>          return(fit)
>      }
>
> but this doesn't work, because the function name is turned into
> `survival::coxph` (with the backticks) and the evaluation fails.
>
> How can I solve this?
>
> Thanks, G,
>
> ______________________________________________
> R-package-devel using r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-package-devel



More information about the R-package-devel mailing list