<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.19088"></HEAD>
<BODY>
<DIV dir=ltr align=left><FONT color=#0000ff size=2 face=Arial><SPAN
class=978105919-11072011>Olá Walmes, boa tarde.</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT color=#0000ff size=2 face=Arial><SPAN
class=978105919-11072011></SPAN></FONT> </DIV>
<DIV dir=ltr align=left><FONT color=#0000ff size=2 face=Arial><SPAN
class=978105919-11072011>Tentei aplicar o código que você sugeriu mas para
"which.max" o resultado está sendo apenas o maior valor para
x$regiao</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT color=#0000ff size=2 face=Arial><SPAN
class=978105919-11072011>e o que pretendo obter seria o número de vezes
(frequencia) em que x$região ocorre.</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT color=#0000ff size=2 face=Arial><SPAN
class=978105919-11072011></SPAN></FONT> </DIV>
<DIV dir=ltr align=left><FONT color=#0000ff size=2 face=Arial><SPAN
class=978105919-11072011>De qualquer forma, eu agradeço por sua
ajuda.</SPAN></FONT></DIV>
<DIV dir=ltr align=left><FONT color=#0000ff size=2 face=Arial><SPAN
class=978105919-11072011></SPAN></FONT> </DIV>
<DIV dir=ltr align=left><FONT color=#0000ff size=2 face=Arial><SPAN
class=978105919-11072011>Clayton</SPAN></FONT></DIV><FONT color=#0000ff size=2
face=Arial></FONT><BR>
<DIV dir=ltr lang=pt-br class=OutlookMessageHeader align=left>
<HR tabIndex=-1>
<FONT size=2 face=Tahoma><B>De:</B> r-br-bounces@listas.c3sl.ufpr.br
[mailto:r-br-bounces@listas.c3sl.ufpr.br] <B>Em nome de </B>Walmes
Zeviani<BR><B>Enviada em:</B> sexta-feira, 8 de julho de 2011
19:21<BR><B>Para:</B> r-br@listas.c3sl.ufpr.br<BR><B>Assunto:</B> Re: [R-br]
Dúvida para montar um agrupamento<BR></FONT><BR></DIV>
<DIV></DIV><FONT face="trebuchet ms,sans-serif">Outra possibilidade seria usar
alguém da família **ply() do pacote plyr, no caso a ddply(), veja<BR><BR><SPAN
style="FONT-FAMILY: courier new,monospace">daSim <- subset(da,
principal=="Sim")</SPAN><BR style="FONT-FAMILY: courier new,monospace"><SPAN
style="FONT-FAMILY: courier new,monospace">str(daSim)</SPAN><BR
style="FONT-FAMILY: courier new,monospace"><BR
style="FONT-FAMILY: courier new,monospace"><SPAN
style="FONT-FAMILY: courier new,monospace">require(plyr)</SPAN><BR
style="FONT-FAMILY: courier new,monospace"><SPAN
style="FONT-FAMILY: courier new,monospace">ddply(daSim,
.(identificador),</SPAN><BR style="FONT-FAMILY: courier new,monospace"><SPAN
style="FONT-FAMILY: courier new,monospace">
.fun=function(x){ x[which.max(x$regiao),] })</SPAN><BR
style="FONT-FAMILY: courier new,monospace"><BR
style="FONT-FAMILY: courier new,monospace">À disposição.<BR><BR
clear=all></FONT><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">==========================================================================</SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">Walmes Marques Zeviani</SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">LEG (Laboratório de Estatística e
Geoinformação, 25.450418 S, 49.231759 W)</SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">Departamento de Estatística -
Universidade Federal do Paraná</SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">fone: (+55) 41 3361 3573</SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">VoIP: (3361 3600) 1053
1173</SPAN><BR style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">e-mail: <A
href="mailto:walmes@ufpr.br" target=_blank>walmes@ufpr.br</A></SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">twitter: @walmeszeviani</SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">homepage: <A
href="http://www.leg.ufpr.br/%7Ewalmes"
target=_blank>http://www.leg.ufpr.br/~walmes</A></SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">linux user number: 531218</SPAN><BR
style="FONT-FAMILY: trebuchet ms,sans-serif"><SPAN
style="FONT-FAMILY: trebuchet ms,sans-serif">==========================================================================</SPAN><BR></BODY></HTML>