R/fweibull4.R

Defines functions `fweibull4`

`fweibull4` <-
function(x, p) {
  ## dweibull does not like named vectors as first argument
  p[1] + p[2] * dweibull(as.numeric(x), p[3], p[4])
}

Try the cardidates package in your browser

Any scripts or data that you put into this service are public.

cardidates documentation built on May 2, 2019, 5:16 p.m.