Valeu Eder! Vou testar e depois respondo relatando o resultado.
[ ]'s.
Edson Lira
Estatístico
Manaus-Amazonas
Em Quarta-feira, 14 de Maio de 2014 8:16, Éder Comunello
<[email protected]> escreveu:
Senhores, bom dia!
Apenas supondo...
### <code r>
t1[!duplicated(t1$tecnico),]
### deverá retornar só a primeira linha (nas demais tecnico="Cavalcante" é
duplicado!)
t1[!duplicated(t1),] ### utiliza todos os campos (colunas) e retorna só linhas
distintas!!!
t1[!duplicated(cbind(t1$data_de_realizacao,t1$tx_tipo_exame,t1$tecnico)),]
t1[!duplicated(t1[,3:5]),] ### mesmo que forma anterior
### as três formas deverão retornarão as linhas 1 e 10, mas a primeira forma
não é consistente.
### É comum a 'repetição' intencional do exame (por recomendação médica,
p.ex.), de modo que poderão haver registros do mesmo tipo de exame em datas
diferentes (e por vezes realizado pelo mesmo técnico). A segunda e terceira
forma são 'chaveadas' pelos campos de interesse.
</code>
Agora é necessário aplicar o código pra ver se procede. Espero que ajude,
Éder Comunello <[email protected]>
Dourados, MS - [22 16.5'S, 54 49'W]
Em 13 de maio de 2014 16:25, Edson Lira <[email protected]> escreveu:
Caros amigos, tenho um banco de exames com a estrutura abaixo
>
>
> id data_de_coleta data_de_realizacao
>tx_tipo_exame tecnico
>1 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.406
>Albumina Cavalcante
>2 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.406
>Albumina Cavalcante
>3 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.406
>Albumina Cavalcante
>4 161538 2013-01-01 00:31:00
2013-01-01 08:20:01.406 Albumina Cavalcante
>5 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.406
>Albumina Cavalcante
>6 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.406
>Albumina Cavalcante
>7 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.406
>Albumina Cavalcante
>8 161538 2013-01-01
00:31:00 2013-01-01 08:20:01.406 Albumina Cavalcante
>9 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.406
>Albumina Cavalcante
>10 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>11 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>12 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>13 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina
Total e Frações Cavalcante
>14 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>15 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>16 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>17 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>18 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>19 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>20 161538
2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e Frações
Cavalcante
>21 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>22 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>23 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>24 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>25 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>26 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações
Cavalcante
>27 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>28 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>29 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>30 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>31 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>32 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>33 161538 2013-01-01 00:31:00
2013-01-01 08:20:01.859 Bilirrubina Total e Frações Cavalcante
>
>
>t1<- ger[order(ger$tecnico,ger$data_de_realizacao, decreasing=TRUE) ,]
>
>
>gern<- t1[!duplicated(t1$tecnico),]
>
>Estou querendo, manter os exames (somente um de cada) eliminando os repetidos
>e os respectivos técnicos.
>
>Com a rotina acima não estou conseguindo.
>
>Gostaria de obeter o resultado abaixo:
> id data_de_coleta data_de_realizacao
>tx_tipo_exame tecnico
>1 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.406
>Albumina Cavalcante
>10 161538 2013-01-01 00:31:00 2013-01-01 08:20:01.859 Bilirrubina Total e
>Frações Cavalcante
>
>Exemplifiquei com dois tipos de exames, pode ser que tenha 3 ou 4 exames.Só
>gostaria de eliminar os repetidos.
>
>[ ]'s.
>
>Edson Lira
>Estatístico
>Manaus-Amazonas
>_______________________________________________
>R-br mailing list
>[email protected]
>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.
>
_______________________________________________
R-br mailing list
[email protected]
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.
