Displaying 1 result from an estimated 1 matches for "tp3595719p3595719".
2011 Jun 14
1
Multiply list objects
...<- function(y) crossprod(table(DF[DF$C %in% y, 1:2]))
years <- sort(unique(DF$C))
f <- as.data.frame(embed(years, 3))
g<-lapply(split(f, f[, 1]), e)
h<-lapply(g, function (x) ifelse(x>0,1,0))
--
View this message in context: http://r.789695.n4.nabble.com/Multiply-list-objects-tp3595719p3595719.html
Sent from the R help mailing list archive at Nabble.com.