# \donttest{
bio <- Bioenergetic(
species_params = list(
consumption = list(CEQ = 1, CA = 0.303, CB = -0.275, CQ = 0.06)
),
species_info = list(common_name = "Example fish")
)
temp <- data.frame(Day = 1:365, Temperature = rep(15, 365))
bio <- set_environment(bio, temp)
# }
Run the code above in your browser using DataLab