powered by
object
## S3 method for class 'nls': formula(object)
nls
formula
data(Orange) fm1 <- nls(circumference ~ A/(1+exp((B-age)/C)), Orange, start = list(A=160, B=700, C = 350)) formula(fm1)
Run the code above in your browser using DataLab