<div dir="ltr"><div dir="ltr"><div>Prezado Paulo, <br></div><div><br></div><div>Ainda continuando o exemplo, veja se ajuda</div><div><br></div><div>nomes<-paste("[",LETTERS,"]",sep="")<br>df4<-data.frame(cidades=rownames(df3))<br>for(i in 1:length(nomes)){<br> df4<-cbind(df4,apply(df[grep(nomes[i],names(df))],1,sum))<br>}<br>df4<-df4[-1]<br>names(df4)<-LETTERS<br>df4<br>df4[1:3]==df2</div><div><br></div><div>Att.</div><div>Alan<br></div></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Em seg, 1 de abr de 2019 às 19:08, Paulo Eduardo de Mesquita por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>> escreveu:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr">Muito obrigado ao Alan e ao Vinicius pelas ideias.<div><br><div>A solução proposta pelo Alan funciona perfeitamente no meu exemplo. Vou precisar pensar um pouco mais para reproduzi-la na minha estrutura de dados como um todo e não coluna por coluna como fiz no meu exemplo de trabalho. De qualquer forma, a sua ideia é um excelente ponto de partida. </div><div><br></div><div>Sobre o princípio da parcimônia invocado pelo Vinícius, eu concordo. Talvez eu não sido muito feliz na descrição do problema. Não sei se vou conseguir agora, mas vou tentar novamente. </div><div><br></div><div>Na minha base de dados original existe uma variável categórica que aceita duas subcategorias: simples (A, B, C, D, E, F, G, H . . .) e as combinadas (AC, CA, ABCDE, FHB, BCH . . .). Essa variável deve ser analisada em função de outra variável relacionada ao espaço (no meu exemplo, utilizei as cidades para representar essa variável). Na base de dados original são duas colunas com as quais eu construo uma estrutura matricial (tabela dinâmica), que por sua vez possui esses dois tipos de colunas as quais me refiro. A solução que procuro visa realocar as frequências das colunas combinadas para as simples, criando uma nova estrutura que tenha apenas "colunas simples" mas que conserve a representação contida anteriormente nas colunas combinadas. Não sei se fiel ao principio da economia, todas elas partem da tabela dinâmica e não da estrutura original. É certo que deve haver outras soluções. Só não estou sendo capaz de enxerga-las.</div><div><br></div><div>Muito obrigado pela ajuda,</div><div><br></div><div>Paulo<br><div><br></div></div></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Em seg, 1 de abr de 2019 às 12:00, <<a href="mailto:r-br-request@listas.c3sl.ufpr.br" target="_blank">r-br-request@listas.c3sl.ufpr.br</a>> escreveu:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Enviar submissões para a lista de discussão R-br para <br>
<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a><br>
<br>
Para se cadastrar ou descadastrar via WWW, visite o endereço<br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
ou, via email, envie uma mensagem com a palavra 'help' no assunto ou<br>
corpo da mensagem para <br>
<a href="mailto:r-br-request@listas.c3sl.ufpr.br" target="_blank">r-br-request@listas.c3sl.ufpr.br</a><br>
<br>
Você poderá entrar em contato com a pessoa que gerencia a lista pelo<br>
endereço<br>
<a href="mailto:r-br-owner@listas.c3sl.ufpr.br" target="_blank">r-br-owner@listas.c3sl.ufpr.br</a><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. Redistribuição das contagens de uma estrutura de dados<br>
(Paulo Eduardo de Mesquita)<br>
2. Re: Redistribuição das contagens de uma estrutura de dados<br>
(Vinicius Brito Rocha)<br>
3. Re: Redistribuição das contagens de uma estrutura de dados<br>
(Alan Rodrigo Panosso)<br>
<br>
<br>
----------------------------------------------------------------------<br>
<br>
Message: 1<br>
Date: Sun, 31 Mar 2019 15:20:45 -0300<br>
From: Paulo Eduardo de Mesquita <<a href="mailto:paulomesquita7@gmail.com" target="_blank">paulomesquita7@gmail.com</a>><br>
To: a lista Brasileira oficial de discussão do programa R.<br>
<<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>><br>
Subject: [R-br] Redistribuição das contagens de uma estrutura de<br>
dados<br>
Message-ID:<br>
<CABODYa729SrqoJHUOv9oTC7dS8W++fdRPCt=<a href="mailto:YzZXr9NtZx%2Bb_w@mail.gmail.com" target="_blank">YzZXr9NtZx+b_w@mail.gmail.com</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Prezado(a)s Colegas,<br>
<br>
Peço a vossa ajuda para encontrar solução para o seguinte problema:<br>
<br>
Eu tenho uma estrutura de dados do tipo tabela dinâmica cujos nomes de<br>
colunas podem ser "simples" ou "combinações separadas por vírgulas" (ver<br>
código anexo).<br>
<br>
As colunas com nomes combinados são construídas através da "concatenação"<br>
dos nomes de colunas simples.<br>
<br>
As colunas com nomes combinados assumem formas imprevisíveis e ocorrem<br>
aleatoriamente conforme a base de dados que lhe dá origem vai crescendo.<br>
<br>
Eu preciso redistribuir as contagens contidas nas colunas com nomes<br>
combinados para colunas de nomes simples, de modo que se, em uma linha<br>
qualquer da minha tabela de origem, houver uma coluna AB com valor 3, na<br>
minha tabela ajustada, o valor 3 será somado uma vez ao que já havia na<br>
mesma linha correspondente das colunas A e B. O exemplo que segue anexo,<br>
imagino eu, facilita a compreensão do problema.<br>
<br>
Muito obrigado pela atenção,<br>
-- <br>
Paulo Eduardo de Mesquita<br>
Disciplina de Infectologia - Faculdade de Medicina Universidade do Oeste<br>
Paulista Presidente Prudente - São Paulo - Brasil<br>
telefone: 5518 97718261<br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190331/8984a7ae/attachment-0001.html" rel="noreferrer" target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190331/8984a7ae/attachment-0001.html</a>><br>
-------------- Próxima Parte ----------<br>
Um anexo não-texto foi limpo...<br>
Nome: exemplo.R<br>
Tipo: application/octet-stream<br>
Tamanho: 630 bytes<br>
Descrição: não disponível<br>
URL: <<a href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190331/8984a7ae/attachment-0001.obj" rel="noreferrer" target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190331/8984a7ae/attachment-0001.obj</a>><br>
<br>
------------------------------<br>
<br>
Message: 2<br>
Date: Sun, 31 Mar 2019 15:29:51 -0300<br>
From: Vinicius Brito Rocha <<a href="mailto:viniciusbritor@gmail.com" target="_blank">viniciusbritor@gmail.com</a>><br>
To: a lista Brasileira oficial de discussão do programa R.<br>
<<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>><br>
Subject: Re: [R-br] Redistribuição das contagens de uma estrutura<br>
de dados<br>
Message-ID:<br>
<<a href="mailto:CAJSzTeeASw8Qjk10ny5T43YQ6s8dOgSBULg2kFgmn66rpiSmUQ@mail.gmail.com" target="_blank">CAJSzTeeASw8Qjk10ny5T43YQ6s8dOgSBULg2kFgmn66rpiSmUQ@mail.gmail.com</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Paulo,<br>
<br>
Confesso que fiquei confuso.<br>
Vou tomar a liberdade de perguntar exatamente o q vc pretende resolver?<br>
Pois vc trouxe a dúvida sobre a execução. De repente existem outras saídas<br>
para o seu problema original.<br>
Apenas seguindo o princípio da parcimônia.<br>
Grande abraço.<br>
<br>
<br>
Em dom, 31 de mar de 2019 15:21, Paulo Eduardo de Mesquita por (R-br) <<br>
<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>> escreveu:<br>
<br>
> Prezado(a)s Colegas,<br>
><br>
> Peço a vossa ajuda para encontrar solução para o seguinte problema:<br>
><br>
> Eu tenho uma estrutura de dados do tipo tabela dinâmica cujos nomes de<br>
> colunas podem ser "simples" ou "combinações separadas por vírgulas" (ver<br>
> código anexo).<br>
><br>
> As colunas com nomes combinados são construídas através da "concatenação"<br>
> dos nomes de colunas simples.<br>
><br>
> As colunas com nomes combinados assumem formas imprevisíveis e ocorrem<br>
> aleatoriamente conforme a base de dados que lhe dá origem vai crescendo.<br>
><br>
> Eu preciso redistribuir as contagens contidas nas colunas com nomes<br>
> combinados para colunas de nomes simples, de modo que se, em uma linha<br>
> qualquer da minha tabela de origem, houver uma coluna AB com valor 3, na<br>
> minha tabela ajustada, o valor 3 será somado uma vez ao que já havia na<br>
> mesma linha correspondente das colunas A e B. O exemplo que segue anexo,<br>
> imagino eu, facilita a compreensão do problema.<br>
><br>
> Muito obrigado pela atenção,<br>
> --<br>
> Paulo Eduardo de Mesquita<br>
> Disciplina de Infectologia - Faculdade de Medicina Universidade do Oeste<br>
> Paulista Presidente Prudente - São Paulo - Brasil<br>
> telefone: 5518 97718261<br>
> _______________________________________________<br>
> R-br mailing list<br>
> <a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça<br>
> código mínimo reproduzível.<br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190331/63f6d736/attachment-0001.html" rel="noreferrer" target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190331/63f6d736/attachment-0001.html</a>><br>
<br>
------------------------------<br>
<br>
Message: 3<br>
Date: Mon, 1 Apr 2019 00:29:25 -0300<br>
From: Alan Rodrigo Panosso <<a href="mailto:alan.panosso@unesp.br" target="_blank">alan.panosso@unesp.br</a>><br>
To: a lista Brasileira oficial de discussão do programa R.<br>
<<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>><br>
Subject: Re: [R-br] Redistribuição das contagens de uma estrutura<br>
de dados<br>
Message-ID:<br>
<<a href="mailto:CANfu3eXPyuS%2Bdn__LKDw8z_Xn2XVBt8jiRvFU%2B5SBXGOusgO8w@mail.gmail.com" target="_blank">CANfu3eXPyuS+dn__LKDw8z_Xn2XVBt8jiRvFU+5SBXGOusgO8w@mail.gmail.com</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Prezado Paulo,<br>
<br>
Veja se ajuda, continuei a partir de seu exemplo.<br>
utilizei a função "grep()"<br>
<br>
names(df)<br>
A2<-apply(df[grep("[A]",names(df))],1,sum)<br>
B2<-apply(df[grep("[B]",names(df))],1,sum)<br>
C2<-apply(df[grep("[C]",names(df))],1,sum)<br>
df3<-data.frame(A2,B2,C2)<br>
df2 == df3<br>
<br>
Att<br>
Alan<br>
<br>
<br>
<br>
<br>
Em dom, 31 de mar de 2019 às 15:21, Paulo Eduardo de Mesquita por (R-br) <<br>
<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>> escreveu:<br>
<br>
> Prezado(a)s Colegas,<br>
><br>
> Peço a vossa ajuda para encontrar solução para o seguinte problema:<br>
><br>
> Eu tenho uma estrutura de dados do tipo tabela dinâmica cujos nomes de<br>
> colunas podem ser "simples" ou "combinações separadas por vírgulas" (ver<br>
> código anexo).<br>
><br>
> As colunas com nomes combinados são construídas através da "concatenação"<br>
> dos nomes de colunas simples.<br>
><br>
> As colunas com nomes combinados assumem formas imprevisíveis e ocorrem<br>
> aleatoriamente conforme a base de dados que lhe dá origem vai crescendo.<br>
><br>
> Eu preciso redistribuir as contagens contidas nas colunas com nomes<br>
> combinados para colunas de nomes simples, de modo que se, em uma linha<br>
> qualquer da minha tabela de origem, houver uma coluna AB com valor 3, na<br>
> minha tabela ajustada, o valor 3 será somado uma vez ao que já havia na<br>
> mesma linha correspondente das colunas A e B. O exemplo que segue anexo,<br>
> imagino eu, facilita a compreensão do problema.<br>
><br>
> Muito obrigado pela atenção,<br>
> --<br>
> Paulo Eduardo de Mesquita<br>
> Disciplina de Infectologia - Faculdade de Medicina Universidade do Oeste<br>
> Paulista Presidente Prudente - São Paulo - Brasil<br>
> telefone: 5518 97718261<br>
> _______________________________________________<br>
> R-br mailing list<br>
> <a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça<br>
> código mínimo reproduzível.<br>
<br>
<br>
<br>
-- <br>
<br>
<br>
<br>
Alan Rodrigo Panosso<br>
<br>
----------------------------------------------------------------------------<br>
<br>
Professor Assistente Doutor - Departamento de Ciências Exatas<br>
Faculdade de Ciências Agrárias e Veterinárias - FCAV - UNESP/Jaboticabal<br>
<br>
Via de Acesso Prof.Paulo Donato Castellane s/n<br>
<br>
14884-900 - Jaboticabal, SP<br>
<br>
E_mail: alan.panosso@u <<a href="mailto:alanrp@mat.feis.unesp.br" target="_blank">alanrp@mat.feis.unesp.br</a>><a href="http://nesp.br" rel="noreferrer" target="_blank">nesp.br</a> ou<br>
<br>
<a href="mailto:arpanosso@yahoo.com.br" target="_blank">arpanosso@yahoo.com.br</a><br>
Tel.: (16) 3209-7210<br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190401/cfd6a766/attachment-0001.html" rel="noreferrer" target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190401/cfd6a766/attachment-0001.html</a>><br>
<br>
------------------------------<br>
<br>
Subject: Legenda do Digest<br>
<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
<br>
<br>
------------------------------<br>
<br>
Fim da Digest R-br, volume 100, assunto 1<br>
*****************************************<br>
</blockquote></div><br clear="all"><div><br></div>-- <br><div dir="ltr" class="gmail-m_6360790612645551091gmail_signature">Paulo Eduardo de Mesquita<br>Disciplina de Infectologia - Faculdade de Medicina Universidade do Oeste Paulista Presidente Prudente - São Paulo - Brasil<br>telefone: 5518 97718261</div>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</blockquote></div><br clear="all"><br>-- <br><div dir="ltr" class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><p> </p>
<p><a name="SignatureSanitizer_SafeHtmlFilter_UNIQUE_ID_SafeHtmlFilter__MailAutoSig">Alan Rodrigo Panosso</a></p>
<p>----------------------------------------------------------------------------</p>
<p>Professor Assistente Doutor -
Departamento de Ciências Exatas<br>
Faculdade de Ciências Agrárias e Veterinárias - FCAV - UNESP/Jaboticabal<br></p><p>Via de Acesso Prof.Paulo Donato Castellane s/n </p><p><font size="2" face="arial, helvetica, sans-serif">14884-900 - Jaboticabal, SP</font></p><p><font size="2" face="arial, helvetica, sans-serif">E_mail: <span style="color:blue"><a href="mailto:alanrp@mat.feis.unesp.br" target="_blank">alan.panosso@u</a><a href="http://nesp.br" target="_blank">nesp.br</a></span> ou<br></font></p><p>
<font size="2" face="arial, helvetica, sans-serif"><a href="mailto:arpanosso@yahoo.com.br" target="_blank"><span style="color:blue">arpanosso@yahoo.com.br</span></a><br>
Tel.: (16) 3209-7210</font></p></div></div></div></div></div></div>