[R-pkg-devel] Forward function call

[William Dunlap]

Use
   Call[[1]] <- quote(survival::coxph)

Bill Dunlap
TIBCO Software
wdunlap tibco.com


On Mon, Jun 8, 2020 at 12: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
>

	[[alternative HTML version deleted]]