<html><body><div style="color:#000; background-color:#fff; font-family:times new roman, new york, times, serif;font-size:12pt"><div><span>Fernando, talvez eu não tenha entendido exatamente o que você quer. Veja dois exemplos, considerando as colunas 2 e 3 de 'warpbreaks' (disponivel no 'datasets', como o 'iris').<br></span></div><div><br></div><div>### Considerando que um 'factor' é um inteiro, apenas retiramos os 'levels', e vc pode manipular</div><div>### Se ha 3 ou mais classes, o resultado nao é binário, é inteiro de 1 ao número de classes<br><span></span><span></span><span>sapply(warpbreaks[,2:3], unclass)</span>
</div><div><span>sapply(warpbreaks[,2:3], unclass)-1</span>
</div><div><br>
</div><div>
</div><div><br><span></span></div><div><span>### converte em colunas binárias, como dummies em qualquer modelo regressão <br></span></div><div><span>### se há mais de duas classes, é criado mais de uma coluna</span></div><div><span>model.matrix(~wool + tension, warpbreaks)[,-1]<br> </span></div><div> <br>Att.<br></div><div>Elias T. Krainski<br><blockquote style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; margin-top: 5px; padding-left: 5px;"> <div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"> <div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"> <font face="Arial" size="2"> <hr size="1"> <b><span style="font-weight: bold;">De:</span></b> Fernando Neto <fernandoneto7@gmail.com><br> <b><span style="font-weight: bold;">Para:</span></b> r-br@listas.c3sl.ufpr.br <br> <b><span style="font-weight: bold;">Enviadas:</span></b> Segunda-feira, 12 de Dezembro de 2011 21:32<br>
<b><span style="font-weight: bold;">Assunto:</span></b> [R-br] Transformar Variáveis discretas em Numeros Binários -> Pre-processamento para Redes Neurais<br> </font> <br><meta http-equiv="x-dns-prefetch-control" content="off"><div id="yiv158727812">Boa noite, R-anos!<div>Por favor, estou precisando ajustar os arquivos de uma base de dados para processamento de uma RNA.</div><div>Estou usando a função decodeClassLabels(...) mas a operacao tá ficando muito custosa.</div>
<div>Por exemplo</div><div>__</div><div>Masculino Programador</div><div>Masculino Médico</div><div>Feminino Programador</div><div>__</div><div>tem que ser</div><div>__</div><div>0 1 0 1</div><div>1 0 1 0</div><div>
__</div><div><br></div><div>Só que eu trato cada variável de cada vez. E acho que a operacao de concatenacao que eu uso:</div><div>cbind(...) tá tornando a operacao custosa (além de que a memória passa de 2GB).</div><div>
<br></div><div>PS.: eu faço o seguinte:</div><div><br></div><div><div><i><font class="yiv158727812Apple-style-span" color="#ff0000">for (i in (VETOR COM AS COLUNAS A SEREM TRANSFORMADAS)){</font></i></div><div><i><font class="yiv158727812Apple-style-span" color="#ff0000"> colAux = decodeClassLabels(vector[,i])</font></i></div>
<div><i><font class="yiv158727812Apple-style-span" color="#ff0000"> vector = vector [,-i]</font></i></div><div><i><font class="yiv158727812Apple-style-span" color="#ff0000"> vector = cbind(vector, colAux) </font></i></div><div><i><font class="yiv158727812Apple-style-span" color="#ff0000">} </font></i></div>
</div><div><br></div><div>Alguém sugere algo?</div><div><br></div><div>Muito grato!!!<br>Fernando<br><div><br></div>-- <br><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333">----------------------------------------------------------------<br>
</font></font></span><div><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><b>Fernando Neto</b></font></font></span><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><span style="font-size: x-small;"><br>
Twitter: @fernandompneto</span></font></font></span></div><div><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><span style="font-size: x-small;">Facebook: <a rel="nofollow" target="_blank" href="http://facebook.com/fernandompneto">facebook.com/fernandompneto</a><br>
<br>Tecnologia de Ponte<br></span></font></font></span><a rel="nofollow" target="_blank" href="http://tecnologiadeponte.blogspot.com"><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><span style="font-size: x-small;">http://tecnologiadeponte.blogspot.com</span></font></font></span></a><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><br>
----------------------------------------------------------------<br><b>fmpn2 @ CIn - UFPE</b><br></font></font></span><a rel="nofollow" target="_blank" href="http://cin.ufpe.br/%7Efmpn2"><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><span style="font-size: x-small;">http://cin.ufpe.br/~fmpn2</span></font></font></span></a><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><span style="font-size: x-small;"><br>
<br>- Engenharia da Computação - Turma 2009.2 - CIn, UFPE.<br>- </span></font></font></span><a rel="nofollow" target="_blank" href="http://www.cin.ufpe.br/%7Eet586/"><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><span style="font-size: x-small;">Monitor de Estatistica e Probabilidade Para Engenharia da Computacao</span></font></font></span></a></div>
<div><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><br></font></font></span></div><div><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><a rel="nofollow" target="_blank" href="http://cin.ufpe.br/%7Eif672cc"></a>----------------------------------------------------------------</font></font></span><div>
<div><span style="background-color: rgb(255, 255, 255);"><font face="verdana, sans-serif"><font color="#333333"><span style="font-size: x-small;">Confidencialidade*: *A informação contida nesta mensagem de e-mail,<br>incluindo quaisquer anexos, é confidencial e está reservada apenas à pessoa ou entidade para a qual foi endereçada. Se você não é o destinatário ou a pessoa responsável por encaminhar esta mensagem ao destinatário, você está, por meio desta, notificado que não deverá rever, retransmitir, imprimir, copiar, usar ou distribuir esta mensagem de e-mail ou quaisquer anexos. Caso você tenha recebido esta mensagem por engano, por favor, contate o remetente imediatamente e apague esta mensagem de seu computador ou de qualquer outro banco de dados. Muito obrigado.<br>
Confidentiality Notice: The information contained in this email message, including any attachment, is confidential and is intended only for the person or entity to which it is addressed. If you are neither the intended recipient nor the employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that you may not review, retransmit, convert to hard copy, copy, use or distribute this email message or any attachments to it. If you have received this email in error, please contact the sender immediately and delete this message from any computer or other data bank. Thank you.</span><br>
<br>--------</font></font></span></div></div></div><br>
</div>
</div><meta http-equiv="x-dns-prefetch-control" content="on"><br>_______________________________________________<br>R-br mailing list<br><a ymailto="mailto:R-br@listas.c3sl.ufpr.br" 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><br> </div> </div> </blockquote></div> </div></body></html>