[R-br] Factors no R

[Henrique Dallazuanna]

Leandro tente,
table(cut(x, c(-Inf, 2, 6, 8, 9, Inf), labels = sprintf("Tipo %s", 1:5)))

2011/8/24 Leandro Marino <leandro em cesgranrio.org.br>

> ** **
>
> Caros,****
>
> Em algum ponto do tempo houve uma mudança na função factor.****
>
> ### no passado:****
>
> *R.version*
>
> #              _                           ****
>
> #platform       i386-pc-mingw32             ****
>
> #arch           i386                        ****
>
> #os             mingw32                     ****
>
> #system         i386, mingw32               ****
>
> #status                                     ****
>
> #major          2                          ****
>
> #minor          9.0                         ****
>
> #year           2009                        ****
>
> #month          04                          ****
>
> #day            17                          ****
>
> #svn rev        48333                       ****
>
> #language       R                           ****
>
> #version.string R version 2.9.0 (2009-04-17)****
>
> *set.seed(1)*
>
> *x <- round(runif(150,0,10),0)*
>
> *table(x)*
>
> #x****
>
> # 0  1  2  3  4  5  6  7  8  9 10 ****
>
> # 4 14 15 13 16 19 16 18 15 14  6 ****
>
> *table(as.character(factor(x,levels=c(0:10),labels=c(rep('Tipo 1',3),*
>
> *       rep('Tipo 2',4),rep('Tipo 3',2),'Tipo 4','Tipo 5'))))*
>
> #Tipo 1 Tipo 2 Tipo 3 Tipo 4 Tipo 5 ****
>
> #    33     64     33     14      6****
>
> ** **
>
> R.version****
>
> #               _                            ****
>
> #platform       i386-pc-mingw32              ****
>
> #arch           i386                         ****
>
> #os             mingw32                      ****
>
> #system         i386, mingw32                ****
>
> #status                                      ****
>
> #major          2                            ****
>
> #minor          13.1                         ****
>
> #year           2011                         ****
>
> #month          07                           ****
>
> #day            08                           ****
>
> #svn rev        56322                        ****
>
> #language       R                            ****
>
> #version.string R version 2.13.1 (2011-07-08)****
>
> set.seed(1)****
>
> x <- round(runif(150,0,10),0)****
>
> table(x)****
>
> #x****
>
> # 0  1  2  3  4  5  6  7  8  9 10 ****
>
> # 4 14 15 13 16 19 16 18 15 14  6 ****
>
> table(as.character(factor(x,levels=c(0:10),labels=c(rep('Tipo 1',3),****
>
>       rep('Tipo 2',4),rep('Tipo 3',2),'Tipo 4','Tipo 5'))))****
>
> #****
>
> #Tipo 1 Tipo 2 Tipo 3 Tipo 4 Tipo 5 ****
>
> #    33     64     33     14      6 ****
>
> #Mensagens de aviso perdidas:****
>
> #In `levels<-`(`*tmp*`, value = c("Tipo 1", "Tipo 1", "Tipo 1", "Tipo 2",
> :****
>
> #  não se permite mais níveis duplicados em fatores****
>
> Ele até faz mas com mensagem de erro. Como poderia fazer isto sem ter o
> erro!?****
>
> ** **
>
>  ****
>
> Atenciosamente,
> *Leandro Lins Marino**
> **Centro de Avaliação**
> **Fundação CESGRANRIO**
> **Rua Santa Alexandrina, 1011 - 2º andar**
> **Rio de Janeiro, RJ - CEP: 20261-903**
> **(** **(21) 2103-9600 R.:236 **
> ***** leandro em cesgranrio.org.br*
>
> ** **
>
> P*  **Antes de imprimir* *pense em sua responsabilidade e compromisso com
> o* *MEIO AMBIENTE* ****
>
> ** **
>
> 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.
> ****
>
> Portanto, se você recebeu esta mensagem por engano, por favor, nos informe
> respondendo imediatamente a este e-mail e em seguida apague-a.****
>
> ** **
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código mínimo reproduzível.
>



-- 
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110824/22f20943/attachment.html>
-------------- Próxima Parte ----------
Um anexo não-texto foi limpo...
Nome: image001.jpg
Tipo: image/jpeg
Tamanho: 2743 bytes
Descrição: não disponível
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110824/22f20943/attachment.jpg>