The R Project SVN R

Rev

Rev 27497 | Rev 42333 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 27497 Rev 30449
Line 36... Line 36...
36
  \code{\link{nls}},
36
  \code{\link{nls}},
37
  \code{\link{profile}},
37
  \code{\link{profile}},
38
  \code{\link{profile.nls}}
38
  \code{\link{profile.nls}}
39
}
39
}
40
\examples{
40
\examples{
41
data( BOD )
-
 
42
# obtain the fitted object
41
# obtain the fitted object
43
fm1 <- nls(demand ~ SSasympOrig( Time, A, lrc ), data = BOD)
42
fm1 <- nls(demand ~ SSasympOrig( Time, A, lrc ), data = BOD)
44
# get the profile for the fitted model
43
# get the profile for the fitted model
45
pr1 <- profile( fm1 )
44
pr1 <- profile( fm1 )
46
opar <- par(mfrow = c(2,2), oma = c(1.1, 0, 1.1, 0), las = 1)
45
opar <- par(mfrow = c(2,2), oma = c(1.1, 0, 1.1, 0), las = 1)