[R] extracting and restricting coefficients

Dereje Bacha
2012-10-17T02:23:58Z

Hi

I want to fit two equations simultaneously
EQ1<-Y1~X1+X2
EQ2<-Y2~X1+X2
eqsystem<-list(Y1HAT=EQ1,Y2HAT=EQ2)
fitols<-systemfit(eqsystem,
method="OLS", data=BB)

How do I get coefficients for the first equation? R code
How do I restrict coefficient of X2 in the first equation (say , restrict it to
less than  zero). R code
Your help is
appreciated.

Dereje
	[[alternative HTML version deleted]]