# create an example
params <- NS_params
species_params(params)$biomass_observed <-
c(0.8, 61, 12, 35, 1.6, NA, 10, 7.6, 135, 60, 30, NA)
species_params(params)$biomass_cutoff <- 10
params <- calibrateBiomass(params)
# Plot with default options
plotBiomassObservedVsModel(params, ratio = FALSE)
# Plot including also species without observations
plotBiomassObservedVsModel(params, show_unobserved = TRUE, ratio = FALSE)
# Show the ratio instead
plotBiomassObservedVsModel(params)
Run the code above in your browser using DataLab