Use plot() on a ‘nlreg.contours’ object
This is a method for the function plot for
objects inheriting from class nlreg.contours.
## S3 method for class 'nlreg.contours'
plot(x, alpha = c(0.1, 0.05), drawlabels = FALSE, lwd1 = 1, lwd2 = 1,
lty1 = "solid", lty2 = "solid", cl1 = "blue", cl2 = "red",
col = "black", pch1 = 1, pch2 = 16, cex = 0.5, ...)x |
a |
alpha |
a numerical vector defining the levels of the contours; the default
is |
drawlabels |
logical value. Contours are labelled if |
lwd1, lwd2 |
the line widths used to compare different curves in the same
plot; default is |
lty1, lty2 |
line types used to compare different curves in the same plot;
default is |
cl1, cl2, col |
colors used to compare different curves in the same plot; default
is |
pch1, pch2 |
character types used to compare different values in the same plot;
default is |
cex |
the character expansions relative to the standard size of the
device to be used for printing text. The default is
|
... |
additional graphics parameters. |
No value is returned.
A plot is produced on the current graphics device.
## Not run:
data(metsulfuron)
metsulfuron.nl <-
nlreg( formula = log(area) ~ log( b1+(b2-b1) / (1+(dose/b4)^b3) ),
weights = ~ ( 1+dose^exp(g) )^2, data = metsulfuron,
start = c(b1 = 138, b2 = 2470, b3 = 2, b4 = 0.07, g = log(0.3)),
hoa = TRUE )
##
metsulfuron.prof <- profile( metsulfuron.nl, trace = TRUE )
metsulfuron.cont <- contour( metsulfuron.prof, ret = TRUE, plotit = FALSE )
par( mai = rep(0.2, 4) )
plot( metsulfuron.cont )
## End(Not run)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.