R/modelmethods.R

pifun <- function(x){UseMethod("pifun",x)}
pifun.Model <- function(x){return(x$pifun)}
  
DanielBonnery/pubBonneryBreidtCoquet2017 documentation built on May 6, 2019, 1:35 p.m.