summary.all.nlreg.profiles {nlreg}

Summary Method for Objects of Class ‘all.nlreg.profiles’

Description

Returns a summary list for objects of class all.nlreg.profiles.

Usage

## S3 method for class 'all.nlreg.profiles'
summary(object, alpha = 0.05, twoside = TRUE, digits = NULL, ...)

Arguments

object

an all.nlreg.profiles object, that is, the result from a call to profile.nlreg with offset = "all".

alpha

a vector of levels for confidence intervals; the default is 95%, that is, 1-\alpha = 0.95.

twoside

a logical value. If TRUE, two-sided confidence intervals are returned. The default is TRUE.

digits

the number of significant digits to be printed.

...

absorbs any additional argument.

Details

This function is a method for the generic function summary for objects of class all.nlreg.profiles. It can be invoked by calling summary or directly summary.all.nlreg.profiles for an object of the appropriate class.

Value

A list is returned where the first components are named after the parameters of the nonlinear model that was profiled. Each component represents a matrix with k\dim(\code{alpha}) rows and 2 columns, where k equals 2 or 4 depending on whether hoa = TRUE in the call that generated the nlreg.profile object. This matrix contains the upper and lower confidence bounds for the test statistics considered and for the confidence levels defined through alpha. The remaining components are the following:

mle

a 2\times d matrix containing the MLEs and s.e.s of the d parameters.

offset

a vector of character strings returning the parameter names.

twoside

a logical value indicating whether two-sided or one-sided confidence intervals were calculated.

hoa

a logical value indicating whether higher order solutions were calculated.

digits

the number of significant digits to be printed.

call

an image of the call that produced the object, but with all arguments named.

See Also

nlreg.profile.objects, profile.nlreg, summary

Examples

## 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 )
summary( metsulfuron.prof, alpha = c(0.1, 0.05) )
## End(Not run)