print.systemfit {systemfit}

Print results of systemfit estimation

Description

These functions print a few results of the estimated equation system.

Usage

   ## S3 method for class 'systemfit'
print( x,
      digits = max( 3, getOption("digits") - 1 ), ... )

   ## S3 method for class 'systemfit.equation'
print( x,
      digits = max( 3, getOption("digits") - 1 ), ... )

Arguments

x

an object of class systemfit or systemfit.equation.

digits

number of digits to print.

...

other arguments.

Author(s)

Jeff D. Hamann [e-mail],
Arne Henningsen [e-mail]

See Also

systemfit, summary.systemfit

Examples

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

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

## results of the whole system
print( fitols )

## results of the first equation
print( fitols$eq[[1]] )

## results of the second equation
print( fitols$eq[[2]] )