Produces a scatterplot of y vs x with fitted mean curve overlaid.
# S3 method for senlm
plot(x, ...)
Model fit.
additional optional arguments.
Plot of senlm model fit over data
if (FALSE) {
## Plot fitted model
model <- set_models(mean_fun="gaussian", err_dist="zip")
fit <- senlm(model=model, data=haul, xvar="depth", yvar="Sebastolobus.altivelis")
plot(fit)
}