# NOT RUN {
model <-
initialise_model(
backbone = backbone_bifurcating(),
gold_standard = gold_standard_default(tau = .01, census_interval = 1)
)
# }
# NOT RUN {
model <- model %>%
generate_tf_network() %>%
generate_feature_network() %>%
generate_kinetics() %>%
generate_gold_standard()
plot_gold_simulations(model)
plot_gold_mappings(model)
plot_gold_expression(model)
model <- model %>%
generate_cells() %>%
generate_experiment
dataset <- wrap_dataset(model)
# }
Run the code above in your browser using DataLab