Jonas, usei sua rotina abaixo e funcionou. Muito obrigado.
> addmargins(tapply(acj$Quantidade,list(Laboratório=acj$lab,Mês=acj$Mês),sum,na.rm=T))#Laboratórios
Mês
Laboratório Jan Fev Mar Abr Mai Jun Jul Ago Set Out Nov Sum
Bioquímica 24927 25529 24589 23736 29551 30175 28760 29220 24291 22189 25452 288419
Estudo de Hemoglobinopatias 300 226 232 201 293 360 209 243 233 208 213 2718
H. Pardini 546 479 436 360 433 403 405 455 357 310 387 4571
HEMATOLOGIA 8764 8877 8398 7969 9389 9360 9264 9585 8145 7548
8336 95635
HORMÔNIOS 1137 1276 1307 1271 1579 1522 1479 1519 1257 1286 1348 14981
IMUNOLOGIA ERITROCITÁRIA 1961 1942 1890 1820 2132 2206 1996 1992 1736 1564 1879 21118
PARASITOLOGIA/URINÀLISE 4365 4265 3477 3526 4183 4581 4581 4582 3898 3667 3910 45035
HEMOSTASIA 1174 987 1025 928 1266 1167 1257 1134 792 732 863 11325
IMUNOLOGIA 1839 1570 1428 2220 1715 1522 1266 1490 1349 1253 1484 17136
SOROLOGIA 3327 3116 2863 3431 4437 4426 4294 4134 2834 1993 2068 36923
PATOLOGIA CLÍNICA 42 60 51 69 38 43 48 37 53 41 39 521
TESTE DO PESINHO
23 34 10 2 8 1 2 NA 1 5 5 NA
Citoquímica 3 4 0 1 0 0 0 NA NA NA NA NA
Laboratório de Apoio 6 3 1 0 1 1 1
NA 1 NA 1 NA
Hemoam/HLA 93 41 49 131 106 152 365 303 136 127 63 1566
Outro 0 9 15 8 12 11 17 14 19 14 16 135
Sum 48507 48418 45771 45673 55143 55930 53944 NA NA NA NA NA
Veja que nas somas aonde existe NA, a soma não foi efetivada, o que está faltando que ainda não identifiquei? não consegui eliminar os
NAS.
Edson Lira
Estatístico
Manaus-Amazonas
De: jonas bodini alonso <jonasbal@ig.com.br>
Para:
r-br@listas.c3sl.ufpr.br; Edson Lira <edinhoestat@yahoo.com.br>
Enviadas: Terça-feira, 14 de Agosto de 2012 15:03
Assunto: Re: [R-br] Duvida no TAPPLY
use addmargins
Jonas
Em 14 de agosto de 2012 10:38, Edson Lira
<edinhoestat@yahoo.com.br> escreveu:
Estou usando esta rotina e obtenho
tapply(acj$Quantidade,list(Laboratório=acj$lab,Mês=acj$Mês),sum,na.rm=T)#Laboratórios
E obtenho esta saída abaixo, que me dá o quantitativo de exames mensal, para obter a soma nas linhas e a soma nas colunas,o que devo acrescdentar a rotina?
Mês
Laboratório Jan Fev Mar Abr Mai Jun Jul Ago Set Out
Bioquímica 24927 25529 24589 23736 29551 30175 28760 29220 24291 22189
Estudo de Hemoglobinopatias 300 226 232 201 293 360 209 243 233 208
H. Pardini 546 479 436 360 433 403 405 455 357 310
HEMATOLOGIA 8764 8877 8398 7969 9389 9360 9264 9585 8145 7548
HORMÔNIOS 1137 1276 1307 1271 1579 1522 1479 1519 1257 1286
IMUNOLOGIA ERITROCITÁRIA 1961 1942 1890 1820 2132 2206 1996 1992 1736 1564
PARASITOLOGIA/URINÀLISE 4365 4265 3477 3526 4183 4581 4581 4582 3898 3667
HEMOSTASIA 1174 987 1025 928 1266 1167 1257 1134 792 732
IMUNOLOGIA 1839 1570
1428 2220 1715 1522 1266 1490 1349 1253
SOROLOGIA 3327 3116 2863 3431 4437 4426 4294 4134 2834 1993
[ ]'s.
Edson Lira
Estatístico
Manaus-Amazonas
_______________________________________________
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.