<html><head><style type='text/css'>p { margin: 0; }</style></head><body><div style='font-family: Times New Roman; font-size: 12pt; color: #000000'><span>Qual procedimento para converte um arquivo .txt para .csv, ou sesa, uma banco da PNAD<br><br><span name="x"></span>Jorge Alves de Sousa<br>Prof. Adjunto I<br>Coordenador pro tempore do Curso de Licenciatura em Matemática<span name="x"></span><br></span><br><hr id="zwchr"><b>De: </b>r-br-request@listas.c3sl.ufpr.br<br><b>Para: </b>r-br@listas.c3sl.ufpr.br<br><b>Enviadas: </b>Quarta-feira, 8 de Fevereiro de 2012 12:00:02<br><b>Assunto: </b>Digest R-br, volume 12, assunto 8<br><br>Enviar submissões para a lista de discussão R-br para <br>        r-br@listas.c3sl.ufpr.br<br><br>Para se cadastrar ou descadastrar via WWW, visite o endereço<br>        https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br<br>ou, via email, envie uma mensagem com a palavra 'help' no assunto ou<br>corpo da mensagem para <br>        r-br-request@listas.c3sl.ufpr.br<br><br>Você poderá entrar em contato com a pessoa que gerencia a lista pelo<br>endereço<br>        r-br-owner@listas.c3sl.ufpr.br<br><br>Quando responder, por favor edite sua linha Assunto assim ela será<br>mais específica que "Re: Contents of R-br digest..."<br><br><br>Tópicos de Hoje:<br><br>   1. Re: Referências C/C++ e R (Eduardo Leoni)<br>   2. Re: Usando o nome da coluna dentro do apply (Eduardo Leoni)<br><br><br>----------------------------------------------------------------------<br><br>Message: 1<br>Date: Tue, 7 Feb 2012 15:01:50 -0200<br>From: Eduardo Leoni <e.leoni@gmail.com><br>To: r-br@listas.c3sl.ufpr.br<br>Subject: Re: [R-br] Referências C/C++ e R<br>Message-ID:<br>        <CAEKuhtiODAe8StpxLi_ox578Pf7r-3a9UGVYjF1V7+EhFAwvcg@mail.gmail.com><br>Content-Type: text/plain; charset="iso-8859-1"<br><br>Eu começaria lendo a documentação Rcpp. Por exemplo:<br><br>http://dirk.eddelbuettel.com/papers/Rcpp-introduction.pdf<br><br><br><br>2012/2/7 Leandro Marino <leandromarino@leandromarino.com.br><br><br>> *<br>> *<br>> *Caros,*<br>> *<br>> *<br>> *tentei localizar sem sucesso nos históricos da lista. Alguém por acaso<br>> pode sugerir referências (além do Google :) ) para aprender sobre C / C++.<br>> Seria interessante algum material que focasse em estatística e no R. Vi o<br>> livro *<br>>  Statistical Computing in C++ and R<br>> *mas não sei se é bom. O preço dele é salgado para arriscar... *<br>> *<br>> *<br>> *Um abraço,*<br>> *Leandro*<br>><br>> _______________________________________________<br>> R-br mailing list<br>> R-br@listas.c3sl.ufpr.br<br>> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br<br>> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça<br>> código mínimo reproduzível.<br>><br>-------------- Próxima Parte ----------<br>Um anexo em HTML foi limpo...<br>URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120207/570c011e/attachment-0001.html><br><br>------------------------------<br><br>Message: 2<br>Date: Tue, 7 Feb 2012 15:13:00 -0200<br>From: Eduardo Leoni <e.leoni@gmail.com><br>To: r-br@listas.c3sl.ufpr.br<br>Subject: Re: [R-br] Usando o nome da coluna dentro do apply<br>Message-ID:<br>        <CAEKuhtjLtBUiMrx8uzujdrYGuG9TeOiz4amPMXVKooMn5-ofAQ@mail.gmail.com><br>Content-Type: text/plain; charset="iso-8859-1"<br><br>O que Eder falou. Mas mesmo assim não daria certo.<br><br>O jeito mais fácil, mas é um "copout" é usar um loop. Ou se quiser mesmo<br>apply:<br><br>apply(names(dados),2,funcao)<br><br>modificando a funcao para pegar o nome da coluna e extrair de 'dados'.<br><br><br><br>2012/2/6 Eder David Borges da Silva <eder@leg.ufpr.br><br><br>> Vanessa,<br>> se sei se é esse o problemas, mas sua matriz parece estar sem nome,<br>> por isso esta retornando o NULL<br>> quando a matriz tem nome nas colunas o colnames funciona:<br>><br>> dados = replicate(100,rnorm(50))<br>> ## Colocando os nomes<br>> dimnames(dados)[[2]] <- paste('X',1:100,sep='')<br>> head(dados)<br>> colnames(dados)<br>><br>> dimnames(dados)[[2]]<br>><br>> funcao = function(coluna){<br>>    y = coluna<br>>    x = 2*coluna<br>>    tabela = data.frame(x,y)<br>>    nome1 = colnames(coluna)<br>>    nome2 = names(coluna)<br>>     #write.csv(FILE,paste(nome1,'.csv',sep=''))<br>>     saida = list(nome1,nome2,x,y)<br>>    return(saida)<br>> }<br>><br>> resultados = apply(dados,2,funcao)<br>><br>> Acho que pode ser isso...<br>> Éder<br>><br>><br>><br>> Em 6 de fevereiro de 2012 16:12, Vanessa Leotti Torman<br>> <vleotti@yahoo.com.br> escreveu:<br>> > Caros membros da lista R-br,<br>> ><br>> > gostaria de uma ajuda em relação a situação a seguir. Gostaria de aplicar<br>> > certa função as colunas de uma matriz, sendo que entre outras coisas, a<br>> > função que desejo deve gravar arquivos csv com os dados. Entretanto,<br>> preciso<br>> > de um arquivo apra cada coluna, e não estou conseguindo transferir o nome<br>> > (ou número da coluna) dentro da função apply.<br>> ><br>> > Um código exemplo está abaixo:<br>> ><br>> > dados = replicate(100,rnorm(50))<br>> ><br>> > funcao = function(coluna){<br>> >     y = coluna<br>> >     x = 2*coluna<br>> >     tabela = data.frame(x,y)<br>> >     nome1 = colnames(coluna)<br>> >     nome2 = names(coluna)<br>> >     #write.csv("tabela_?NOMEDACOLUNA?.csv")<br>> >     saida = list(nome1,nome2,x,y)<br>> >     return(saida)<br>> > }<br>> ><br>> > resultados = apply(dados,2,funcao)<br>> ><br>> > O problema está em como passar o nome da coluna, pois tanto o "names" e o<br>> > "colnames" retornam NULL.<br>> ><br>> > Eu sei que se o objetivo fosse somente o de criar estes vários arquivos<br>> > poderia usar "eval" e "paste", mas a função que quero aplicar é muito<br>> mais<br>> > complexa que esta. O objetivo de criar os arquivos csv é poder tirar<br>> alguns<br>> > objetos da saída da minha função e assim economizar memória RAM. Tais<br>> > objetos não são primordias para mim mas gostaria de salvá-los.<br>> ><br>> > Muito obrigada,<br>> > Vanessa B Leotti Torman<br>> > UFRGS<br>> ><br>> ><br>> ><br>> ><br>> ><br>> > _______________________________________________<br>> > R-br mailing list<br>> > R-br@listas.c3sl.ufpr.br<br>> > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br<br>> > Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça<br>> código<br>> > mínimo reproduzível.<br>> _______________________________________________<br>> R-br mailing list<br>> R-br@listas.c3sl.ufpr.br<br>> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br<br>> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça<br>> código mínimo reproduzível.<br>><br>-------------- Próxima Parte ----------<br>Um anexo em HTML foi limpo...<br>URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120207/fc7711f3/attachment-0001.html><br><br>------------------------------<br><br>_______________________________________________<br>R-br mailing list<br>R-br@listas.c3sl.ufpr.br<br>https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br<br><br><br>Fim da Digest R-br, volume 12, assunto 8<br>****************************************<br></div></body></html>