<div dir="ltr">Mas parece que você quer fazer na verdade:<div><br></div><div>b1$tipo <- as.factor(b1$tipo)<br><div><br><div> <span style="font-family:arial,sans-serif;font-size:13px">m1 <- m(trh~mus+tipo, data=b1))</span></div>

</div></div><div><span style="font-family:arial,sans-serif;font-size:13px"><br></span></div><div><span style="font-family:arial,sans-serif;font-size:13px">Isso fará com que a variável tipo entre como preditora binária.</span></div>

</div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/10/29 Edson Lira <span dir="ltr"><<a href="mailto:edinhoestat@yahoo.com.br" target="_blank">edinhoestat@yahoo.com.br</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

<div><div style="font-size:12pt;font-family:HelveticaNeue,Helvetica Neue,Helvetica,Arial,Lucida Grande,sans-serif"><div><span>Valeu prof. Paulo, já usei o subset em outras rotinas, muito obrigado.</span></div><div class="im">

<div></div><div> </div><div>[  ]'s.</div><div>Edson Lira<br>Estatístico<br>Manaus-Amazonas</div></div><div style="display:block"> <br> <br> <div style="font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif;font-size:12pt">

 <div style="font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif;font-size:12pt"> <div dir="ltr"> <font face="Arial"> Em Terça-feira, 29 de Outubro de 2013 16:23, Paulo Justiniano <<a href="mailto:paulojus@leg.ufpr.br" target="_blank">paulojus@leg.ufpr.br</a>> escreveu:<br>

 </font> </div><div><div class="h5">  <div>m1<-lm(trh~mus+tipo, data=subset(b1, tipo==0))<br clear="none"><br clear="none"><br clear="none"><div><br clear="none">On Tue, 29 Oct 2013, Edson Lira wrote:<br clear="none">
<br clear="none">
> Caros amigos, estou tentando fazer um estudo de regressão com duas variáveis<br clear="none">> preditoras. Dados e comandos abaixo:<br clear="none">> <br clear="none">> mus<-c(2,6,8,3,2,7,9,8,4,6)<br clear="none">

>  tr<-c("e","m","e","m","e","e","m","m","e","e")<br clear="none">>  trh<-c(2.9,3.0,4.8,1.8,2.9,4.9,4.2,4.8,4.4,4.5)<br clear="none">

>  tipo<-ifelse(tr=="e",1,0) #codificar a variável tr, 1=eletrico 2=mecânico<br clear="none">> <br clear="none">> b1<-data.frame(mus,tipo,trh)<br clear="none">> Quero fazer a análise  usando a variável tipo. <br clear="none">

> <br clear="none">> São dois modelos: um quando o e=1 e o outro e=0.<br clear="none">> <br clear="none">> <br clear="none">>  Não estou conseguindo
 implementar, alguém poderia dar alguma sugestão?<br clear="none">> [  ]'s.<br clear="none">> <br clear="none">> Edson Lira<br clear="none">> Estatístico<br clear="none">> Manaus-Amazonas<br clear="none">

> <br clear="none">></div><br><br></div>  </div></div></div> </div>  </div> </div></div><br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><div><br></div>-- <br>

Manoel Galdino<br><a href="https://sites.google.com/site/galdinomcz/" target="_blank">https://sites.google.com/site/galdinomcz/</a><br>
</div>