MixedEffectsModel(
response = list(
hst = units::as_units("m")
),
covariates = list(
dsob = units::as_units("cm")
),
parameters = list(
beta_0 = 40.4218,
beta_1 = -0.0276,
beta_2 = 0.936
),
predict_ranef = function() {
list(b_0_i = 0, b_2_i = 0)
},
predict_fn = function(dsob) {
1.37 + (beta_0 + b_0_i) * (1 - exp(beta_1 * dsob)^(beta_2 + b_2_i))
},
fixed_only = TRUE
)
Run the code above in your browser using DataLab