<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:x="urn:schemas-microsoft-com:office:excel" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<meta name=Generator content="Microsoft Word 12 (filtered medium)">
<style>
<!--
/* Font Definitions */
@font-face
{font-family:Wingdings;
panose-1:5 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Consolas;
panose-1:2 11 6 9 2 2 4 3 2 4;}
@font-face
{font-family:"Arial Narrow";
panose-1:2 11 5 6 2 2 2 3 2 4;}
@font-face
{font-family:Webdings;
panose-1:5 3 1 2 1 5 9 6 7 3;}
@font-face
{font-family:"Tw Cen MT";
panose-1:2 11 6 2 2 1 4 2 6 3;}
@font-face
{font-family:"Trebuchet MS";
panose-1:2 11 6 3 2 2 2 2 2 4;}
@font-face
{font-family:"Palatino Linotype";
panose-1:2 4 5 2 5 5 5 3 3 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{mso-margin-top-alt:auto;
margin-right:0cm;
mso-margin-bottom-alt:auto;
margin-left:0cm;
font-size:12.0pt;
font-family:"Times New Roman","serif";
mso-believe-normal-left:yes;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
p
{mso-style-priority:99;
mso-margin-top-alt:auto;
margin-right:0cm;
mso-margin-bottom-alt:auto;
margin-left:0cm;
font-size:12.0pt;
font-family:"Times New Roman","serif";}
span.EstiloDeEmail17
{mso-style-type:personal-compose;
font-family:"Arial Narrow","sans-serif";
color:#404040;}
.MsoChpDefault
{mso-style-type:export-only;}
@page Section1
{size:595.3pt 841.9pt;
margin:70.85pt 3.0cm 70.85pt 3.0cm;}
div.Section1
{page:Section1;}
-->
</style>
<![if mso 9]>
<style>
p.MsoNormal
{margin-left:37.5pt;}
</style>
<![endif]><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body bgcolor=white background="cid:image001.jpg@01CC624C.D019CC90" lang=PT-BR
link=blue vlink=purple style='margin-left:37.5pt;margin-top:15.0pt'>
<img src="cid:image001.jpg@01CC624C.D019CC90"
v:src="cid:image001.jpg@01CC624C.D019CC90" v:shapes="_x0000_Mail" width=0
height=0 class=shape style='display:none;width:0;height:0'>
<div class=Section1>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial","sans-serif";
color:#006666'>Caros,<o:p></o:p></span></p>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Arial","sans-serif";
color:#006666'>Em algum ponto do tempo houve uma mudança na função factor.<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span
style='font-size:10.0pt;font-family:Consolas;color:#006666'>### no passado:<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><b><span
style='font-size:10.0pt;font-family:Consolas;color:#548DD4'>R.version<o:p></o:p></span></b></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#</span><span
style='font-size:10.0pt;font-family:Consolas;color:#006666'>
_ <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#platform
i386-pc-mingw32 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#arch
i386 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#os
mingw32 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#system
i386, mingw32 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#status
<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#major
2 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#minor
9.0 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#year
2009 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#month
04 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#day
17 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#svn rev
48333 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#language
R <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#version.string R
version 2.9.0 (2009-04-17)<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><b><span
lang=EN-US style='font-size:10.0pt;font-family:Consolas;color:#548DD4'>set.seed(1)<o:p></o:p></span></b></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><b><span
lang=EN-US style='font-size:10.0pt;font-family:Consolas;color:#548DD4'>x <-
round(runif(150,0,10),0)<o:p></o:p></span></b></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><b><span
lang=EN-US style='font-size:10.0pt;font-family:Consolas;color:#548DD4'>table(x)<o:p></o:p></span></b></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#x<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'># 0 1 2 3 4 5
6 7 8 9 10 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'># 4 14 15 13 16 19
16 18 15 14 6 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><b><span
lang=EN-US style='font-size:10.0pt;font-family:Consolas;color:#548DD4'>table(as.character(factor(x,levels=c(0:10),labels=c(rep('Tipo
1',3),<o:p></o:p></span></b></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><b><span
style='font-size:10.0pt;font-family:Consolas;color:#548DD4'> rep('Tipo
2',4),rep('Tipo 3',2),'Tipo 4','Tipo 5'))))<o:p></o:p></span></b></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span
style='font-size:10.0pt;font-family:Consolas;color:#006666'>#Tipo 1 Tipo 2 Tipo
3 Tipo 4 Tipo 5 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
style='font-size:10.0pt;font-family:Consolas;color:#006666'># 33 64
33 14 6</span><span lang=EN-US style='font-size:11.0pt;font-family:
Consolas;color:#404040'><o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'><o:p> </o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>R.version<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#
_ <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#platform
i386-pc-mingw32 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#arch
i386 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#os
mingw32 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#system
i386, mingw32 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#status
<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#major
2 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#minor
13.1 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#year
2011 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#month
07 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#day
08 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#svn
rev 56322 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#language
R <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#version.string
R version 2.13.1 (2011-07-08)<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>set.seed(1)<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>x <-
round(runif(150,0,10),0)<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>table(x)<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>#x<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'># 0 1
2 3 4 5 6 7 8 9 10 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'># 4 14
15 13 16 19 16 18 15 14 6 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
lang=EN-US style='font-size:11.0pt;font-family:Consolas;color:#404040'>table(as.character(factor(x,levels=c(0:10),labels=c(rep('Tipo
1',3),<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
style='font-size:11.0pt;font-family:Consolas;color:#404040'> rep('Tipo
2',4),rep('Tipo 3',2),'Tipo 4','Tipo 5'))))<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
style='font-size:11.0pt;font-family:Consolas;color:#404040'>#<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
style='font-size:11.0pt;font-family:Consolas;color:#404040'>#Tipo 1 Tipo 2 Tipo
3 Tipo 4 Tipo 5 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
style='font-size:11.0pt;font-family:Consolas;color:#404040'># 33 64
33 14 6 <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
style='font-size:11.0pt;font-family:Consolas;color:#404040'>#Mensagens de aviso
perdidas:<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
style='font-size:11.0pt;font-family:Consolas;color:#404040'>#In
`levels<-`(`*tmp*`, value = c("Tipo 1", "Tipo 1",
"Tipo 1", "Tipo 2", :<o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt;text-align:justify'><span
style='font-size:11.0pt;font-family:Consolas;color:#404040'># não se permite
mais níveis duplicados em fatores<o:p></o:p></span></p>
<div>
<p class=MsoNormal><span style='font-family:"Tw Cen MT","sans-serif";
color:black'>Ele até faz mas com mensagem de erro. Como poderia fazer isto sem
ter o erro!?<o:p></o:p></span></p>
<p class=MsoNormal><span style='font-family:"Tw Cen MT","sans-serif";
color:black'><o:p> </o:p></span></p>
<p class=MsoNormal><span style='font-family:"Tw Cen MT","sans-serif";
color:black'> <o:p></o:p></span></p>
<p class=MsoNormal><span style='font-family:"Tw Cen MT","sans-serif";
color:black'>Atenciosamente,<br>
</span><b><span style='font-size:11.0pt;font-family:"Tw Cen MT","sans-serif";
color:#000040'>Leandro Lins Marino</span></b><b><span style='font-size:10.0pt;
font-family:"Tw Cen MT","sans-serif";color:#000040'><br>
</span></b><i><span style='font-size:10.0pt;font-family:"Tw Cen MT","sans-serif";
color:gray'>Centro de Avaliação</span></i><i><span style='font-size:10.0pt;
font-family:"Tw Cen MT","sans-serif";color:gray'><br>
</span></i><i><span style='font-size:10.0pt;font-family:"Tw Cen MT","sans-serif";
color:gray'>Fundação CESGRANRIO</span></i><i><span style='font-size:10.0pt;
font-family:"Tw Cen MT","sans-serif";color:gray'><br>
</span></i><i><span style='font-size:10.0pt;font-family:"Tw Cen MT","sans-serif";
color:gray'>Rua Santa Alexandrina, 1011 - 2º andar</span></i><i><span
style='font-size:10.0pt;font-family:"Tw Cen MT","sans-serif";color:gray'><br>
</span></i><i><span style='font-size:10.0pt;font-family:"Tw Cen MT","sans-serif";
color:gray'>Rio de Janeiro, RJ - CEP: 20261-903</span></i><i><span
style='font-size:10.0pt;font-family:"Tw Cen MT","sans-serif";color:gray'><br>
</span></i><i><span style='font-size:10.0pt;font-family:Wingdings;color:gray'>(</span></i><i><span
style='font-size:10.0pt;font-family:"Tw Cen MT","sans-serif";color:gray'> </span></i><i><span
style='font-size:10.0pt;font-family:"Trebuchet MS","sans-serif";color:gray'>(21)
2103-9600 R.:236 </span></i><i><span style='font-size:10.0pt;font-family:"Trebuchet MS","sans-serif";
color:gray'><br>
</span></i><i><span style='font-size:11.0pt;font-family:Wingdings;color:gray'>*</span></i><i><span
style='font-size:11.0pt;font-family:"Tw Cen MT","sans-serif";color:gray'> <a
href="mailto:leandro@cesgranrio.org.br"><span style='color:blue'>leandro@cesgranrio.org.br</span></a><o:p></o:p></span></i></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span
style='font-size:10.0pt;font-family:"Arial","sans-serif";color:#006666'><o:p> </o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span
style='font-size:18.0pt;font-family:Webdings;color:#76923C'>P</span><b><span
style='font-size:7.5pt;font-family:"Palatino Linotype","serif";color:#76923C'>
</span></b><b><span style='font-size:9.0pt;font-family:"Calibri","sans-serif";
color:#76923C'>Antes de imprimir</span></b><span style='font-size:9.0pt;
font-family:"Calibri","sans-serif";color:#76923C'> </span><b><span
style='font-size:9.0pt;font-family:"Calibri","sans-serif";color:#76923C'>pense
em sua responsabilidade e compromisso com o</span></b><span style='font-size:
9.0pt;font-family:"Calibri","sans-serif";color:#76923C'> <b>MEIO AMBIENTE</b></span><span
style='font-size:10.0pt;font-family:"Arial","sans-serif";color:#006666'> <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span
style='font-size:10.0pt;font-family:"Arial","sans-serif";color:#006666'><o:p> </o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span
style='font-size:10.5pt;font-family:Consolas;color:#404040'>Esta mensagem,
incluindo seus anexos, pode conter informacoes privilegiadas e/ou de carater
confidencial, nao podendo ser retransmitida sem autorizacao do remetente. Se
voce nao e o destinatario ou pessoa autorizada a recebe-la, informamos que o
seu uso, divulgacao, copia ou arquivamento sao proibidos. <o:p></o:p></span></p>
<p class=MsoNormal style='margin:0cm;margin-bottom:.0001pt'><span
style='font-size:10.5pt;font-family:Consolas;color:#404040'>Portanto, se você
recebeu esta mensagem por engano, por favor, nos informe respondendo
imediatamente a este e-mail e em seguida apague-a.<o:p></o:p></span></p>
</div>
<p><span style='font-size:10.0pt;font-family:"Arial","sans-serif";color:#006666'><o:p> </o:p></span></p>
</div>
</body>
</html>