R/sumBy.R

sumBy = function( x, groups ){
  result <- sapply( 1:max(groups), function ( g ) sum( x[ groups == g ] ) )
}
sverchkov/BaselineRegularization documentation built on May 9, 2019, 1:26 p.m.