[R-br] Somar intervalo de valores nas colunas

Alexandre Loures alexandre.loures em ymail.com
Terça Abril 8 21:45:24 BRT 2014 

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
> 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/20140408/31b9a7f1/attachment.html>

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