systemfit (version 0.8-0)

print.confint.systemfit: Print confidence intervals of coefficients

Description

This function prints the confidence intervals of the coefficients of the estimated equation system.

Usage

## S3 method for class 'confint.systemfit':
print( x, digits=3, \dots )

Arguments

x

an object of type confint.systemfit.

digits

number of digits to print.

...

other arguments.

See Also

systemfit, confint.systemfit and confint.systemfit.equation

Examples

data( "Kmenta" )
demand <- consump ~ price + income
supply <- consump ~ price + farmPrice + trend
labels <- list( "demand", "supply" )
system <- list( demand, supply )

## perform OLS on each of the equations in the system
fitols <- systemfit( "OLS", system, labels, data = Kmenta )

## calculate and print the confidence intervals
## of all coefficients
ci <- confint( fitols )
print( ci, digits=4 )

## calculate and print the confidence intervals
## of the coefficients of the second equation
ci2 <- confint( fitols$eq[[2]] )
print( ci2, digits=4 )