AA1 1 A B 2 AA2 1 A A 0 AA3 1 B B 1 AA4 1 B B 1 AA1 2 A A 0 AA2 2 A B 2 AA3 2 A B 2 AA4 2 A A 0 AA1 3 B B 1 AA2 3 B B 1 AA3 3 A A 0 AA4 3 A A 0 AA1 4 B B 1 AA2 4 A B 2 AA3 4 A A 1 AA4 4 A B 2 Desta forma, note que o elemento (1,5) na tabela acima foi colocado na posição (1,1) da tabela abaixo. O elemento (5,5) foi colocado na posição (2,1). O elemento (9,5) foi inserido na posição (3,1) e o elemento (13,5) está na posição (4,1). Assim, consigo capturar a variável AA1 de cada indivíduo (1, 2, 3 e 4). Da mesma forma, o elemento (2,5) foi colocado na posição (1,2), o elemento (6,5) foi inserido na posição (2,2) e assim sucessivamente.
AA1 AA2 AA3 AA4 1 2 0 1 1 2 0 2 2 0 3 1 1 0 0 4 1 2 1 2 Não consigo fazer esse redimensionamento da tabela antiga para a nova.Desde já agradeço imensamente sua ajuda.Abraços,Fabrízzio-------Original Message-------Date: 24/10/2012 12:00:14Subject: Digest R-br, volume 20, assunto 30Enviar submissões para a lista de discussão R-br paraPara se cadastrar ou descadastrar via WWW, visite o endereçoou, via email, envie uma mensagem com a palavra 'help' no assunto oucorpo da mensagem paraVocê poderá entrar em contato com a pessoa que gerencia a lista peloendereçoQuando responder, por favor edite sua linha Assunto assim ela serámais específica que "Re: Contents of R-br digest..."Tópicos de Hoje:1. Re: Transformação de dados no dataframe (Augusto Ribas)----------------------------------------------------------------------Message: 1Date: Wed, 24 Oct 2012 09:50:12 -0300From: Augusto Ribas <ribas.aca@gmail.com>Subject: Re: [R-br] Transformação de dados no dataframeMessage-ID:Content-Type: text/plain; charset="windows-1252"Vamos supor um exemplo de dados:#dados de exemplodados<-data.frame(col1=round(runif(20,1,4)),col2=sample(c("A","B"),20,replace=T),col3=sample(c("A","B"),20,replace=T))dados#primeiro com o comando paste, vamos juntar a coluna 2 com a 3, criando osAA AB e BBdados$col4<-factor(paste(dados$col2,dados$col3,sep=""))#Depois como os walmes nos ensinou aqui na lista, a gente usa o match()#para recodificar nos valores que queremos, no caso como vc faloulevels(dados$col4)recod<-c(0,1,1,2)dados$col5<-recod[match(dados$col4,levels(dados$col4))]dados#agora que vc te todos os ingredientes, é so usar o comando table() parafazer essa tabela#eu fiz um exemplo de tabela com a coluna 5 e a coluna 5, mas pelo que vivc quer a coluna#5 e os nomes das linhas, rownames(sua planilha), entao use os nomes dalinha na tabelatable(dados$col5,dados$col4)Espero que ajude.AbraçosEm 24 de outubro de 2012 09:16, fabrizzioconde@gmail.com <fabrizzioconde@gmail.com> escreveu:> Bom dia,>> Existe algum script que faça o seguinte:>> 1) Cria uma quinta coluna na matriz abaixo baseada na terceira e na quarta> coluna DA seguinte forma: AA = 0, BB = 1 e AB = 2.>> AA1 1 A B AA2 1 A A AA3 1 B B AA4 1 B B AA1 2 A A AA2 2 A B AA3 2 A B> AA4 2 A A AA1 3 B B AA2 3 B B AA3 3 A A AA4 3 A A AA1 4 B B AA2 4 A B AA3> 4 A A AA4 4 A B>> Assim, a matriz se transformaria em:>> AA1 1 A B 2 AA2 1 A A 0 AA3 1 B B 1 AA4 1 B B 1 AA1 2 A A 0 AA2 2 A B 2> AA3 2 A B 2 AA4 2 A A 0 AA1 3 B B 1 AA2 3 B B 1 AA3 3 A A 0 AA4 3 A A 0> AA1 4 B B 1 AA2 4 A B 2 AA3 4 A A 1 AA4 4 A B 2>> 2) Após esse passo, tenho que eliminar as colunas 3 e 4 DA matriz acima> (talvez em um novo dataframe) e redimensioná-la para o seguinte formato:>> AA1 AA2 AA3 AA4 1 2 0 1 1 2 0 2 2 0 3 1 1 0 0 4 1 2 1 2>> Ao final, preciso que cada coluna DA matriz acima seja encarada pelo R> como uma variável (AA1, AA2, AA3, AA4), pois irei aplicar o pacote de> regressão logística penalizada stepPlr e considerar essas variáveis> preditoras.>> Muito obrigado.> Fabrízzio> [image: FREE Christmas Animations for your email ? by IncrediMail!> Click Here!]<http://www.incredimail.com/?id=620188&did=10500&ppd=2747,201111071523,9,[TypeID],[IM_UPN2]&rui=139771782&sd=20121024>>> _______________________________________________> R-br mailing list> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça> código mínimo reproduzível.>--GratoAugusto C. A. RibasSite Pessoal: http://augustoribas.heliohost.org-------------- Próxima Parte ----------Um anexo em HTML foi limpo...-------------- Próxima Parte ----------Um anexo não-texto foi limpo...Nome: xmas_girl_en.gifTipo: image/gifTamanho: 61041 bytesDescrição: não disponível------------------------------_______________________________________________R-br mailing listFim da Digest R-br, volume 20, assunto 30*****************************************
_______________________________________________
R-br mailing list
R-br@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.