plot.CRABSset {CRABS}

Plots the rate functions

Description

Plots the rate functions

Usage

## S3 method for class 'CRABSset'
plot(x, ...)

Arguments

x

A list of congruent birth-death x

...

other parameters

Value

a patchwork object object

Examples

data(primates_ebd)
lambda <- approxfun(primates_ebd$time, primates_ebd$lambda)
mu <- approxfun(primates_ebd$time, primates_ebd$mu)
times <- seq(0, max(primates_ebd$time), length.out = 500)

model <- create.model(lambda, mu, times = times)

mus <- list(function(t) 0.2 + exp(0.01*t), 
           function(t) 0.2 + sin(0.35*t) + 0.1*t,
           function(t) 1.0, 
           function(t) 0.5 + 0.2*t)
models <- congruent.models(model, mus = mus)

plot(models)