<div dir="ltr"><div class="gmail_default" style="font-family:"courier new",monospace">Usualmente utilizo o EVIEWS para ajustar o modelo de Clutter aos meus dados, porém a fim de curiosidade estou tentando ajusta-lo usando o R.</div><div class="gmail_default" style="font-family:"courier new",monospace"><br></div><div class="gmail_default" style="font-family:"courier new",monospace">Vi que existe um pacote chamado "systemfit", o qual estou utilizando, porém, não tenho tido sucesso.</div><div class="gmail_default" style="font-family:"courier new",monospace"><br></div><div class="gmail_default"><font face="courier new, monospace">library("systemfit")</font><br></div><div class="gmail_default"><br></div><div class="gmail_default"><div class="gmail_default">eqAB <- LNB2 ~ offset(X1) + X2 + X3 -1</div><div class="gmail_default">eqVol <- LNVol2 ~ INVI2 + S1 + LNB2</div><div class="gmail_default">system <- list( AB = eqAB, Vol = eqVol )</div><div><div><br></div><div>inst <- ~ X1 + X2 + X3 + INVI2 + S1</div><div>instlist <- inst</div><div><br></div><div>fit2sls2 <- systemfit( system, "2SLS", inst = instlist, data = dados )</div><div>print( fit2sls2 )</div></div><div><br></div><div><br></div><div><br></div></div><div class="gmail_default" style="font-family:"courier new",monospace"><br></div><div><br></div>-- <br><div class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><span></span><span></span><a href="http:///" target="_blank"></a><div><div dir="ltr"><div style="font-size:16px;font-family:"times new roman","new york",times,serif;text-align:center"><font face="'bookman old style', 'new york', times, serif"><b>__________________________________________________</b></font></div><div style="font-size:16px;font-family:"times new roman","new york",times,serif;text-align:center"><b><font face="'bookman old style', 'new york', times, serif">Gustavo Martins Soares</font></b></div><div style="font-size:16px;font-family:"times new roman","new york",times,serif"><blockquote style="margin:0px 0px 0px 40px;border:none;padding:0px"></blockquote></div><div style="font-size:16px;font-family:"times new roman","new york",times,serif;text-align:center"><div style="font-family:arial,sans-serif"><div style="font-family:"times new roman","new york",times,serif"><div style="font-family:arial,sans-serif"><font face="bookman old style, new york, times, serif">Doutorando em Silvicultura e Manejo Florestal - ESALQ/USP</font></div><div style="font-family:arial,sans-serif"><font face="bookman old style, new york, times, serif">Mestre em Silvicultura e Manejo Florestal - ESALQ/USP</font></div><div><span style="font-family:"bookman old style","new york",times,serif">Engenheiro Florestal - Universidade Federal de Viçosa (UFV)</span><br></div></div><div><font face="bookman old style, new york, times, serif">CREA: 16633</font></div><div><span style="font-family:"bookman old style","new york",times,serif">(19)98179-4424</span><font face="bookman old style, new york, times, serif"><br></font></div><div><span style="font-family:"bookman old style","new york",times,serif">Laboratório de Ecofisiologia Florestal e Silvicultura - (19)3447-6689</span></div></div></div><div style="font-size:16px;font-family:"times new roman","new york",times,serif"><blockquote style="margin:0px 0px 0px 40px;border:none;padding:0px"></blockquote></div><div style="font-size:16px;text-align:center"><a href="https://br.linkedin.com/pub/gustavo-martins-soares/105/17a/b62" style="font-family:"times new roman","new york",times,serif;font-size:12.8px" target="_blank"><img src="http://iprotech.pt/wp-content/uploads/2015/03/seta-azul.png"><img src="https://static.licdn.com/scds/common/u/img/webpromo/btn_liprofile_blue_80x15_pt_BR.png" alt=""></a><img src="https://docs.google.com/uc?export=download&id=0B8BYVyUg3XggUG5KcFQ4X2xUMjA&revid=0B8BYVyUg3XggYUpRRVlHczh1Tlpzdkp6YmVRUWhMQlorUFE0PQ" style="font-size: 12.8px;"><br></div><div style="font-family:"times new roman","new york",times,serif;text-align:center"><span style="font-family:"bookman old style","new york",times,serif;font-size:16px">_______________________________________________</span><span style="font-family:"bookman old style","new york",times,serif;font-size:16px"></span><span style="font-family:"bookman old style","new york",times,serif;font-size:16px"></span><a href="http:///" style="font-family:"bookman old style","new york",times,serif;font-size:16px" target="_blank"></a><span style="font-family:"bookman old style","new york",times,serif;font-size:16px">____</span><br></div></div></div></div></div></div></div></div></div></div>
</div>