gslnls (version 1.4.1)

formula.gsl_nls: Extract model formula

Description

Returns the model formula from a fitted "gsl_nls" object.

Usage

# S3 method for gsl_nls
formula(x, ...)

Value

If the object inherits from class "nls" returns the fitted model as a formula similar to formula. Otherwise returns the fitted model as a function.

Arguments

x

An object inheriting from class "gsl_nls".

...

At present no optional arguments are used.

See Also

formula

Examples

## data
set.seed(1)
n <- 25
xy <- data.frame(
  x = (1:n) / n,
  y = 2.5 * exp(-1.5 * (1:n) / n) + rnorm(n, sd = 0.1)
)
## model
obj <- gsl_nls(fn = y ~ A * exp(-lam * x), data = xy, start = c(A = 1, lam = 1))

formula(obj)