Produces a scatterplot of y vs x with fitted mean curve overlaid.

# S3 method for senlm
plot(x, ...)

Arguments

x

Model fit.

...

additional optional arguments.

Value

Plot of senlm model fit over data

Examples


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)
}