Self-Starting nls Working model

Computes the Working function

SSworking(input,a,b)

Arguments

input	a numeric vector of values at which to evaluate the model.
a	estimated model parameter
b	estimated model parameter

Value

a numeric vector of the same length as input. It is the value of the expression exp(a+b*(1/x)).

Note

This is primarily intended for use in formulae given to the nls function or similar functions for example mle2 and nlsLM.

References

Goryl A., Jedrzejczyk Z., Kukula K. (Eds.), Osiewalski J., Walkosz A. (2004) "Wprowadzenie do ekonometrii w przykladach i zadaniach", Wydawnictwo Naukowe PWN, Warszawa.

Borkowski B., Dudek H., Szczesny W. (2004) "Ekonometria. Wybrane zagadnienia" , Wydawnictwo Naukowe PWN, Warszawa.

See also

selfStart, getInitial

Examples

x <- 1:15
y <- exp(144+3*(1/x))
model <- nlsLM(y~SSworking(x,a,b))