backbone <- backbone_linear()
simtime_from_backbone(backbone)
model <- initialise_model(
backbone = backbone,
simulation_params = simulation_default(
burn_time = simtime_from_backbone(backbone, burn = TRUE),
total_time = simtime_from_backbone(backbone, burn = FALSE)
)
)
Run the code above in your browser using DataLab