HI,
I assume that you have a data.frame structure.
dat1<- structure(list(Year = c(2000L, 2000L, 2000L, 2000L, 2001L, 2001L,
2001L, 2001L, 2001L), Area = c(1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L,
2L), Q = c(1L, 1L, 1L, 1L, 25L, 1L, 1L, 1L, 1L), Bin = c(5L,
10L, 15L, 20L, 1L, 5L, 10L, 15L, 20L), FD = c(0L, 1L, 23L, 12L,
4L, 1L, 3L, 15L, 4L)), .Names = c("Year", "Area", "Q", "Bin",
"FD"), class = "data.frame", row.names = c(NA, -9L))
aggregate(.~Year+Area,data=dat1[,-3],sum)
# Year Area Bin FD
#1 2000 1 50 36
#2 2001 1 1 4
#3 2001 2 50 23
#or
library(plyr)
ddply(dat1,.(Year,Area),colwise(sum,c("Bin","FD")))
# Year Area Bin FD
#1 2000 1 50 36
#2 2001 1 1 4
#3 2001 2 50 23
A.K.
----- Original Message -----
From: Nicolas L. Gutierrez <nicol...@uw.edu>
To: r-help@r-project.org
Cc:
Sent: Thursday, April 4, 2013 8:42 AM
Subject: [R] summing vectors
Hi All,
Year Area Q Bin FD
I have a large dataset I need to re-structure. It looks something
like this: 2000 1 1 5 0 2000 1 1 10 1 2000 1 1 15 23 2000 1 1 20 12 2000
1 1 25 1 2000 2 1 5 1 2000 2 1 10 3 2000 2 1 15 15 2000 2 1 20 11 2000
2 1 25 3 2000 1 2 5 0 2000 1 2 10 1 2000 1 2 15 23 2000 1 2 20 12 2000
1 2 25 1 2000 2 2 5 1 2000 2 2 10 3 2000 2 2 15 15 2000 2 2 20 11 2000
2 2 25 3 2001 … 2011
And I need to create different vectors (Bin, FD) summing by year and/or
by area; For example, I need a new dataset:
Bin, FD[Year=2000,Area=1],
FD[Year=2000,Area=2], FD[Year=2000], FD[Year=2001,Area=1], etc.
Any help really appreciated!!
NG
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
