[R-br] Somar intervalo de valores nas colunas

Alexandre Loures alexandre.loures em ymail.com
Quarta Abril 9 15:25:32 BRT 2014


Rodrigo,

Deu certo, porém está reportando o erro abaixo. Ou seja, ele somou para 
a maioria dos valores, porém ficaram 39 valores sem somar (NA).

Será que tem solução?



 > warnings()
Mensagens de aviso:
1: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
2: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
3: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
4: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
5: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
6: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
7: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
8: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
9: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
10: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
11: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
12: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
13: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
14: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
15: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
16: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
17: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
18: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
19: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
20: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
21: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
22: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
23: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
24: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
25: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
26: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
27: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
28: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
29: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
30: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
31: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
32: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
33: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
34: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
35: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
36: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
37: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
38: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
39: In FUN(X[[18L]], ...) :
   Estouro da capacidade de inteiro - use sum(as.numeric(.))
 >



Em 09-04-2014 13:24, Rodrigo Coster escreveu:
> Alexandre,
>
> Segue uma solução: aggregate(sp[c(F, F, T)], by = list(Ano = sp$ano), sum)
>
>
> 2014-04-08 21:45 GMT-03:00 Alexandre Loures 
> <alexandre.loures em ymail.com <mailto:alexandre.loures em ymail.com>>:
>
>     Rodrigo, é porque exclui as colunas referentes ao mês e ano. Mas
>     segue abaixo a saída considerando essas duas colunas.
>
>     Com relação a quantidade de zeros, é porque na base já aparece
>     todos os meses para 2014 (jan, fev, mar, abr, ..., dez), todavia,
>     só há informações para janeiro e fevereiro.
>
>     Outro detalhe é que os anos estão na ordem decrescente, ou seja,
>     as primeiras linhas são para 2014 (e uma vez que pediu head está
>     aparecendo somente para esse ano).
>
>     As outras duas sugestões enviadas estão reportando o somatório
>     para a coluna toda, mas não é isso o que preciso. Preciso do total
>     para cada ano, ou seja, terá de ter uma linha com o total para
>     1997, outra linha para 1998 assim sucessivamente até a última
>     linha para o total de 2014.
>
>
>
>
>     > dput(head(sp))
>     structure(list(ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(38795229L, 63924605L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(33680798L, 51477786L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(32400472L, 39645654L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(68022854L, 56066200L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(31881633L, 67045744L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(452118806L, 500158705L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(21795038L, 13562364L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(2730838L, 4259594L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(103132447L, 85622631L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(60353896L, 61121454L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(32403301L, 40519152L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(116570336L, 110079499L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(166832925L, 149309546L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(78060254L, 101650482L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(25985390L, 36699369L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(69222831L, 80306324L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(4392027L, 4567085L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(33752865L, 41537988L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(80216802L, 88982746L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(1489612L, 1465175L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(60973115L, 54078115L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(28441802L, 50033001L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(60420736L, 17987780L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(28824716L, 48507914L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(444712L, 328451L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(786654L, 838397L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(12933000L, 10051098L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(39827569L, 45256447L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(58803226L, 76290276L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(46468076L, 38537192L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(53314093L, 33200142L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(34642085L, 23556561L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(119213241L, 121005345L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(274982262L, 244713051L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(74376824L, 35888744L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(2144991L, 2440378L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(114384520L, 74615518L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(54130383L, 62022477L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(3340357L, 4785296L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(3396350L, 3538952L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(7356480L, 6493192L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(30067652L, 34811828L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(10236714L, 14744233L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(21064904L, 28239710L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(5987416L, 9771117L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(16779486L, 11925052L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(9060866L, 13985017L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(15448503L, 24449350L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(8407209L, 20023742L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(38288341L, 43777071L,
>     0L, 0L, 0L, 0L), ano = c(2014L, 2014L, 2014L, 2014L, 2014L, 2014L
>     ), mes = structure(c(5L, 4L, 9L, 1L, 8L, 7L), .Label = c("ABR",
>     "AGO", "DEZ", "FEV", "JAN", "JUL", "JUN", "MAI", "MAR", "NOV",
>     "OUT", "SET"), class = "factor"), `US$` = c(610282312L, 508090709L,
>     0L, 0L, 0L, 0L)), .Names = c("ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$", "ano", "mes", "US$", "ano", "mes",
>     "US$", "ano", "mes", "US$"), row.names = c(NA, 6L), class =
>     "data.frame")
>     >
>
>
>
>
>
>
>
>
>
>     Em 08-04-2014 21:13, Rodrigo Coster escreveu:
>>     Era isso mesmo, mas eles pareceram meio estranho, pois tem muita
>>     linha com 0... eu tava esperando mais uma coluna informando o mes
>>     e ano e outras com as observações. Se os comandos sugeridos aqui
>>     (que fazem a soma total da coluna) não funcionarem, da uma
>>     explicada de como são os teus dados (a estrutura deles) que a
>>     gente resolve!
>>
>>
>>     2014-04-08 20:37 GMT-03:00 Alexandre Loures
>>     <alexandre.loures em ymail.com <mailto:alexandre.loures em ymail.com>>:
>>
>>         Olá Rodrigo Coster!
>>
>>
>>         É isto mesmo que você solicitou?
>>
>>
>>
>>         > dput(head(sp))
>>         structure(c(38795229L, 63924605L, 0L, 0L, 0L, 0L, 33680798L,
>>         51477786L, 0L, 0L, 0L, 0L, 32400472L, 39645654L, 0L, 0L, 0L,
>>         0L, 68022854L, 56066200L, 0L, 0L, 0L, 0L, 31881633L, 67045744L,
>>         0L, 0L, 0L, 0L, 452118806L, 500158705L, 0L, 0L, 0L, 0L,
>>         21795038L,
>>         13562364L, 0L, 0L, 0L, 0L, 2730838L, 4259594L, 0L, 0L, 0L, 0L,
>>         103132447L, 85622631L, 0L, 0L, 0L, 0L, 60353896L, 61121454L,
>>         0L, 0L, 0L, 0L, 32403301L, 40519152L, 0L, 0L, 0L, 0L,
>>         116570336L,
>>         110079499L, 0L, 0L, 0L, 0L, 166832925L, 149309546L, 0L, 0L, 0L,
>>         0L, 78060254L, 101650482L, 0L, 0L, 0L, 0L, 25985390L, 36699369L,
>>         0L, 0L, 0L, 0L, 69222831L, 80306324L, 0L, 0L, 0L, 0L, 4392027L,
>>         4567085L, 0L, 0L, 0L, 0L, 33752865L, 41537988L, 0L, 0L, 0L, 0L,
>>         80216802L, 88982746L, 0L, 0L, 0L, 0L, 1489612L, 1465175L, 0L,
>>         0L, 0L, 0L, 60973115L, 54078115L, 0L, 0L, 0L, 0L, 28441802L,
>>         50033001L, 0L, 0L, 0L, 0L, 60420736L, 17987780L, 0L, 0L, 0L,
>>         0L, 28824716L, 48507914L, 0L, 0L, 0L, 0L, 444712L, 328451L, 0L,
>>         0L, 0L, 0L, 786654L, 838397L, 0L, 0L, 0L, 0L, 12933000L,
>>         10051098L,
>>         0L, 0L, 0L, 0L, 39827569L, 45256447L, 0L, 0L, 0L, 0L, 58803226L,
>>         76290276L, 0L, 0L, 0L, 0L, 46468076L, 38537192L, 0L, 0L, 0L,
>>         0L, 53314093L, 33200142L, 0L, 0L, 0L, 0L, 34642085L, 23556561L,
>>         0L, 0L, 0L, 0L, 119213241L, 121005345L, 0L, 0L, 0L, 0L,
>>         274982262L,
>>         244713051L, 0L, 0L, 0L, 0L, 74376824L, 35888744L, 0L, 0L, 0L,
>>         0L, 2144991L, 2440378L, 0L, 0L, 0L, 0L, 114384520L, 74615518L,
>>         0L, 0L, 0L, 0L, 54130383L, 62022477L, 0L, 0L, 0L, 0L, 3340357L,
>>         4785296L, 0L, 0L, 0L, 0L, 3396350L, 3538952L, 0L, 0L, 0L, 0L,
>>         7356480L, 6493192L, 0L, 0L, 0L, 0L, 30067652L, 34811828L, 0L,
>>         0L, 0L, 0L, 10236714L, 14744233L, 0L, 0L, 0L, 0L, 21064904L,
>>         28239710L, 0L, 0L, 0L, 0L, 5987416L, 9771117L, 0L, 0L, 0L, 0L,
>>         16779486L, 11925052L, 0L, 0L, 0L, 0L, 9060866L, 13985017L, 0L,
>>         0L, 0L, 0L, 15448503L, 24449350L, 0L, 0L, 0L, 0L, 8407209L,
>>         20023742L,
>>         0L, 0L, 0L, 0L, 38288341L, 43777071L, 0L, 0L, 0L, 0L,
>>         610282312L,
>>         508090709L, 0L, 0L, 0L, 0L), .Dim = c(6L, 51L), .Dimnames = list(
>>             NULL, c("sp1", "sp2", "sp3", "sp4", "sp5", "sp6", "sp7",
>>             "sp8", "sp9", "sp10", "sp11", "sp12", "sp13", "sp14",
>>         "sp15",
>>             "sp16", "sp17", "sp18", "sp19", "sp20", "sp21", "sp22",
>>         "sp23",
>>             "sp24", "sp25", "sp26", "sp27", "sp28", "sp29", "sp30",
>>         "sp31",
>>             "sp32", "sp33", "sp34", "sp35", "sp36", "sp37", "sp38",
>>         "sp39",
>>             "sp40", "sp41", "sp42", "sp43", "sp44", "sp45", "sp46",
>>         "sp47",
>>             "sp48", "sp49", "sp50", "sp51")))
>>
>>
>>
>>
>>
>>         Em 08-04-2014 18:37, Rodrigo Coster escreveu:
>>>         Sem saber como são os teus dados fica complicado a gente de
>>>         dar um comando que certamente funcionará... da um
>>>         dput(head(dados)) e nos envia o que aparecer na tela
>>>
>>>
>>>         2014-04-08 18:34 GMT-03:00 Daniel C Bezerra
>>>         <danielcbezerra em gmail.com <mailto:danielcbezerra em gmail.com>>:
>>>
>>>             apply(nomedobanco,2,sum)
>>>
>>>
>>>             2014-04-08 18:07 GMT-03:00 Alexandre Loures
>>>             <alexandre.loures em ymail.com
>>>             <mailto:alexandre.loures em ymail.com>>:
>>>
>>>                 Olá pessoal!
>>>
>>>                 Tenho uma base de dados com 216 observações de 10
>>>                 variáveis. Sendo que essas observações são mensais,
>>>                 mas tenho que trabalhar com o total anual.
>>>
>>>                 Ou seja, eu tenho dados para os meses de 1997, 1998,
>>>                 1999, 2000, ..., 2014. Mas quero os totais desses
>>>                 anos em cada coluna.
>>>
>>>                 Alguém saberia como fazer isso?
>>>
>>>
>>>
>>>                 Desde já muito obrigado!
>>>
>>>
>>>
>>>                 -- 
>>>                 *Alexandre Rodrigues Loures*
>>>
>>>                 _______________________________________________
>>>                 R-br mailing list
>>>                 R-br em listas.c3sl.ufpr.br
>>>                 <mailto:R-br em 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.
>>>
>>>
>>>
>>>             _______________________________________________
>>>             R-br mailing list
>>>             R-br em listas.c3sl.ufpr.br <mailto:R-br em 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.
>>>
>>>
>>>
>>>
>>>         _______________________________________________
>>>         R-br mailing list
>>>         R-br em listas.c3sl.ufpr.br  <mailto:R-br em 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.
>>
>>         -- 
>>         *Alexandre Rodrigues Loures*
>>
>>         _______________________________________________
>>         R-br mailing list
>>         R-br em listas.c3sl.ufpr.br <mailto:R-br em 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.
>>
>>
>>
>>
>>     _______________________________________________
>>     R-br mailing list
>>     R-br em listas.c3sl.ufpr.br  <mailto:R-br em 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.
>
>     -- 
>     *Alexandre Rodrigues Loures*
>     Doutorando em Economia Aplicada
>     Universidade Federal da Paraíba - UFPB
>     Centro de Ciências Sociais Aplicadas - CCSA
>     Programa de Pós-Graduação em Economia - PPGE
>     Tel.: +55 32 9102-0690 (MG) ou +55 83 9804-1000 (PB)
>     e-Mail: alexandre.loures em ymail.com <mailto:alexandre.loures em ymail.com>
>     Site: www.ccsa.ufpb.br/ppge <http://www.ccsa.ufpb.br/ppge>
>
>     _______________________________________________
>     R-br mailing list
>     R-br em listas.c3sl.ufpr.br <mailto:R-br em 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.
>
>
>
>
> _______________________________________________
> R-br mailing list
> R-br em 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.

-- 
*Alexandre Rodrigues Loures*
Doutorando em Economia Aplicada
Universidade Federal da Paraíba - UFPB
Centro de Ciências Sociais Aplicadas - CCSA
Programa de Pós-Graduação em Economia - PPGE
Tel.: +55 32 9102-0690 (MG) ou +55 83 9804-1000 (PB)
e-Mail: alexandre.loures em ymail.com
Site: www.ccsa.ufpb.br/ppge
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20140409/b0b53e7c/attachment-0001.html>


Mais detalhes sobre a lista de discussão R-br