systemfit (version 0.7-3)

coef.systemfit.equation: Coefficients of systemfit equation

Description

This function extracts the coefficients of a single equation from an object returned by systemfit.

Usage

## S3 method for class 'systemfit.equation':
coef( object, \dots )

Arguments

object

an object of type systemfit.equation.

...

other arguments.

Value

• coef.systemfit.equation returns a vector of the estimated coefficients of a single equation.

See Also

systemfit, coef.systemfit and coef

Examples

library( systemfit )

data( kmenta )
attach( kmenta )
demand <- q ~ p + d
supply <- q ~ p + f + a
labels <- list( "demand", "supply" )
system <- list( demand, supply )

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

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

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