<html><body><div style="color:#000; background-color:#fff; font-family:Courier New, courier, monaco, monospace, sans-serif;font-size:10pt"><div><span>Estou usando esta rotina e obtenho<br></span></div><div><span>tapply(acj$Quantidade,list(Laboratório=acj$lab,Mês=acj$Mês),sum,na.rm=T)#Laboratórios</span></div><div> <br>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?<br><br>                            Mês<br>Laboratório                     Jan   Fev   Mar   Abr   Mai   Jun   Jul   Ago   Set   Out<br> 
 Bioquímica                  24927 25529 24589 23736 29551 30175 28760 29220 24291 22189<br>  Estudo de Hemoglobinopatias   300   226   232   201   293   360   209   243   233   208<br>  H. Pardini                    546   479   436   360   433   403   405   455   357   310<br>  HEMATOLOGIA                  8764  8877  8398  7969  9389  9360  9264  9585  8145  7548<br> 
 HORMÔNIOS                    1137  1276  1307  1271  1579  1522  1479  1519  1257  1286<br>  IMUNOLOGIA ERITROCITÁRIA     1961  1942  1890  1820  2132  2206  1996  1992  1736  1564<br>  PARASITOLOGIA/URINÀLISE      4365  4265  3477  3526  4183  4581  4581  4582  3898  3667<br>  HEMOSTASIA                   1174   987  1025   928  1266  1167  1257  1134   792   732<br>  IMUNOLOGIA                   1839  1570 
 1428  2220  1715  1522  1266  1490  1349  1253<br>  SOROLOGIA                    3327  3116  2863  3431  4437  4426  4294  4134  2834  1993<br><br><br>[  ]'s.<br><br></div><div>Edson Lira<br>Estatístico<br>Manaus-Amazonas</div></div></body></html>