<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman,new york,times,serif;font-size:12pt"><br><div><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><br><div style="padding-left: 5px; margin: 5px 0px 5px 5px; border-left: 2px solid rgb(16, 16, 255); font-family: times new roman,new york,times,serif; font-size: 12pt;"><font size="2" face="Tahoma">----- Mensagem encaminhada ----<br><b><span style="font-weight: bold;">De:</span></b> Paulo Justiniano Ribeiro Jr <paulojus@c3sl.ufpr.br><br><b><span style="font-weight: bold;">Para:</span></b> Grupo R <R_STAT@yahoogrupos.com.br><br><b><span style="font-weight: bold;">Enviadas:</span></b> Quarta-feira, 5 de Novembro de 2008 18:47:26<br><b><span style="font-weight: bold;">Assunto:</span></b> Re: [R_STAT] Tabelas<br></font><br>
<!--~-|**|PrettyHtmlStartT|**|-~-->
<div id="ygrp-mlmsg" style="width: 655px;">
<div id="ygrp-msg" style="width: 470px; margin: 0pt; padding: 0pt 25px 0pt 0pt; float: left;">
<!--~-|**|PrettyHtmlEndT|**|-~-->
<div id="ygrp-text">
<p>rownames(tabelas) <- c("nome 1", "nome 2")<br>
<br>
? rownames<br>
<br>
Paulo Justiniano Ribeiro Jr<br>
LEG (Laboratorio de Estatistica e Geoinformacao)<br>
Universidade Federal do Parana<br>
Caixa Postal 19.081<br>
CEP 81.531-990<br>
Curitiba, PR - Brasil<br>
Tel: (+55) 41 3361 3573<br>
Fax: (+55) 41 3361 3141<br>
e-mail: paulojus AT ufpr br<br>
<a rel="nofollow" target="_blank" href="http://www.leg.ufpr.br/%7Epaulojus">http://www.leg. ufpr.br/~ paulojus</a><br>
<br>
On Wed, 5 Nov 2008, Edson Lira wrote:<br>
<br>
> Olá pessoal, vejam se podem me ajudar eu tenho um banco de dados com k variáveis.<br>
><br>
> Gostaria de criar uma função para me dar na saÃda uma tabela que me mostrasse a frequência absoluta simples e o percentual equivalente lado a lado.<br>
><br>
> Usei o seguinte comando:<br>
><br>
> tabela<- function(x){ cbind((freq< -table(x) ),(percen< -100*prop. table(table( x))))}<br>
> apply(fis, 2, tabela)<br>
><br>
> A saÃda foi a seguinte:<br>
><br>
> $afec_1<br>
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â [,1] [,2]<br>
> ausente              2 18.2<br>
> bronquite alérgica   1 9.1<br>
> bronquite asmática   1 9.1<br>
> derrame pleural      1 9.1<br>
> gripe                1 9.1<br>
> não                  3 27.3<br>
> PNMÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â 1Â 9.1<br>
> sÃfilis no sangue    1 9.1<br>
><br>
> Vejam que as duas colunas são respectivamente o fi e o %, como nomear estas duas colunas?<br>
><br>
> Eu gostaria que mostrasse:<br>
> $afec_1<br>
>                      n  %<br>
> ausente              2 18.2<br>
> bronquite alérgica   1 9.1<br>
> bronquite asmática   1 9.1<br>
> derrame pleural      1 9.1<br>
> gripe                1 9.1<br>
> não                  3 27.3<br>
> PNMÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â 1Â 9.1<br>
> sÃfilis no sangue    1 9.1<br>
><br>
><br>
> Alguém pode me ajudar?<br>
><br>
><br>
> Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail. com.<br>
> <a rel="nofollow" target="_blank" href="http://br.new.mail.yahoo.com/addresses">http://br.new. mail.yahoo. com/addresses</a><br>
</p>
</div>
<!--~-|**|PrettyHtmlStart|**|-~-->
<span style="color: white;">__._,_.___</span>
<div id="ygrp-actbar">
<span class="left">
<a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/message/4714;_ylc=X3oDMTM1dGtiOHFyBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRtc2dJZAM0NzE1BHNlYwNmdHIEc2xrA3Z0cGMEc3RpbWUDMTIyNTkxODA3NQR0cGNJZAM0NzE0">
Mensagens neste tópico </a> (<span class="bld">2</span>)
</span>
<a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/post;_ylc=X3oDMTJxOGdrcGtiBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRtc2dJZAM0NzE1BHNlYwNmdHIEc2xrA3JwbHkEc3RpbWUDMTIyNTkxODA3NQ--?act=reply&messageNum=4715">
<span class="bld">
Responder </span> (através da web)
</a> |
<a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/post;_ylc=X3oDMTJmaGc2MXZuBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNudHBjBHN0aW1lAzEyMjU5MTgwNzU-" class="bld">
Adicionar um novo tópico </a>
</div>
<div id="ygrp-vitnav">
<a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/messages;_ylc=X3oDMTJmNzZuYmRzBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNtc2dzBHN0aW1lAzEyMjU5MTgwNzU-">Mensagens</a>
| <a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/files;_ylc=X3oDMTJnZGJxbDQ5BF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNmaWxlcwRzdGltZQMxMjI1OTE4MDc1">Arquivos</a>
| <a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/photos;_ylc=X3oDMTJmcWxiMDZiBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNwaG90BHN0aW1lAzEyMjU5MTgwNzU-">Fotos</a>
| <a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/links;_ylc=X3oDMTJnNDExbmcyBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNsaW5rcwRzdGltZQMxMjI1OTE4MDc1">Links</a>
| <a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/database;_ylc=X3oDMTJkcWxobXA3BF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNkYgRzdGltZQMxMjI1OTE4MDc1">Banco de dados</a>
| <a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/polls;_ylc=X3oDMTJndDBjYTllBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNwb2xscwRzdGltZQMxMjI1OTE4MDc1">Enquetes</a>
</div>
<div id="ygrp-grft">
</div>
<div id="ygrp-ft">
<a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/;_ylc=X3oDMTJlMDlnZTZqBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNnZnAEc3RpbWUDMTIyNTkxODA3NQ--">
<img src="http://us.i1.yimg.com/us.yimg.com/i/br/groups/groups-brazil_1.gif" alt="Yahoo! Grupos" height="19" width="108" border="0"></a> <br>
<a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/join;_ylc=X3oDMTJnb3Y2aTJrBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNzdG5ncwRzdGltZQMxMjI1OTE4MDc1">Alterar configurações via web</a> (Requer Yahoo! ID) <br>
Alterar configurações via e-mail: <a rel="nofollow" ymailto="mailto:R_STAT-digest@yahoogrupos.com.br?subject= Recebimento de e-mail: Lista de mensagens" target="_blank" href="mailto:R_STAT-digest@yahoogrupos.com.br?subject=%20Recebimento%20de%20e-mail:%20Lista%20de%20mensagens">Alterar recebimento para lista diária de mensagens</a> | <a rel="nofollow" ymailto="mailto:R_STAT-traditional@yahoogrupos.com.br?subject=Alterar formato de distribuição: Tradicional" target="_blank" href="mailto:R_STAT-traditional@yahoogrupos.com.br?subject=Alterar%20formato%20de%20distribui%C3%A7%C3%A3o:%20Tradicional">Alterar formato para o tradicional</a> <br>
<a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT;_ylc=X3oDMTJlaGt1bnRzBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDZnRyBHNsawNocGYEc3RpbWUDMTIyNTkxODA3NQ--">
Visite seu Grupo
</a> |
<a rel="nofollow" target="_blank" href="http://br.yahoo.com/info/utos.html">
Termos de uso do Yahoo! Grupos </a> |
<a rel="nofollow" ymailto="mailto:R_STAT-unsubscribe@yahoogrupos.com.br?subject=" target="_blank" href="mailto:R_STAT-unsubscribe@yahoogrupos.com.br?subject=">
Sair do grupo </a>
</div>
</div>
<div id="ygrp-sponsor" style="width: 160px; float: right; clear: none; margin: 0pt 0pt 25px; background: none repeat scroll 0% 0% white;">
<div id="ygrp-reco">
</div>
<div id="ygrp-vital">
<div id="vithd">Atividade nos últimos dias</div>
<ul style="list-style-type: none; padding: 0pt; margin: 2px 0pt;">
<li style="clear: both;">
<div class="ct" style="float: right;"><span style="display: none;"> </span>8</div>
<div class="cat"><a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT/members;_ylc=X3oDMTJnOTljZmRuBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDdnRsBHNsawN2bWJycwRzdGltZQMxMjI1OTE4MDc1">Novos usuários</a></div>
</li>
</ul>
<a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/group/R_STAT;_ylc=X3oDMTJmcTljdWduBF9TAzk3NDkwNDM3BGdycElkAzExOTIzMjc1BGdycHNwSWQDMjEzNzExMTYwNQRzZWMDdnRsBHNsawN2Z2hwBHN0aW1lAzEyMjU5MTgwNzU-">
Visite seu Grupo </a>
</div>
<div id="nc">
<div class="ad">
<div id="hd1">Yahoo! Mail</div>
<p><a rel="nofollow" target="_blank" href="http://us.lrd.yahoo.com/_ylc=X3oDMTJtbDRlaW9nBF9TAzk3NDkwNDM3BF9wAzEEZ3JwSWQDMTE5MjMyNzUEZ3Jwc3BJZAMyMTM3MTExNjA1BHNlYwNuY21vZARzbGsDbWFpbARzdGltZQMxMjI1OTE4MDc1;_ylg=1/SIG=10ujd6ds6/**http%3A//mail.yahoo.com.br/">Conecte-se ao mundo</a></p>
<p>Proteção anti-spam</p>
<p>Muito mais espaço</p>
</div>
<div class="ad">
<div id="hd1">Yahoo! Barra</div>
<p><a rel="nofollow" target="_blank" href="http://us.lrd.yahoo.com/_ylc=X3oDMTJwYm0zaHE1BF9TAzk3NDkwNDM3BF9wAzIEZ3JwSWQDMTE5MjMyNzUEZ3Jwc3BJZAMyMTM3MTExNjA1BHNlYwNuY21vZARzbGsDdG9vbGJhcgRzdGltZQMxMjI1OTE4MDc1;_ylg=1/SIG=111ngvtas/**http%3A//br.toolbar.yahoo.com/">Instale grátis</a></p>
<p>Buscar sites na web</p>
<p>Checar seus e-mails .</p>
</div>
<div class="ad">
<div id="hd1">Yahoo! Grupos</div>
<p><a rel="nofollow" target="_blank" href="http://br.groups.yahoo.com/;_ylc=X3oDMTJwbG4xazY2BF9TAzk3NDkwNDM3BF9wAzMEZ3JwSWQDMTE5MjMyNzUEZ3Jwc3BJZAMyMTM3MTExNjA1BHNlYwNuY21vZARzbGsDZ3JvdXBzMgRzdGltZQMxMjI1OTE4MDc1">Crie seu próprio grupo</a></p>
<p>A melhor forma de comunicação</p>
<p></p>
</div>
</div>
</div>
<div style="clear: both; color: rgb(255, 255, 255); font-size: 1px;">.</div>
</div> <img src="http://geo.yahoo.com/serv?s=97490437/grpId=11923275/grpspId=2137111605/msgId=4715/stime=1225918075/nc1=1/nc2=2/nc3=3" height="1" width="1"> <br>
<span style="color: white;">__,_._,___</span>
<!--~-|**|PrettyHtmlEnd|**|-~-->
<!--~-|**|PrettyHtmlStart|**|-~-->
<style type="text/css">
<!--
#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#0000ff;text-decoration:none;}
-->
</style>
<style type="text/css">
<!--
#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
-->
</style>
<style type="text/css">
<!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-reco {
margin-bottom:20px;padding:0px;}
#ygrp-reco #reco-head {
font-weight:bold;color:#ff7900;}
#reco-grpname{
font-weight:bold;margin-top:10px;}
#reco-category{
font-size:77%;}
#reco-desc{
font-size:77%;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a{
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc{
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o{font-size:0;}
.MsoNormal{
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq{margin:4;}
-->
</style>
<!--~-|**|PrettyHtmlEnd|**|-~-->
</div></div></div>
</div><br>
</body></html>