R/glapply.R

`glapply` <-
function(x,id,FUN,regroup=TRUE,...){
	   x.l<-split(x,id)
	   fx.l<-lapply(x.l,FUN=FUN,...)
	   if(regroup){unsplit(fx.l,id)}
	   else fx.l
	}

Try the informR package in your browser

Any scripts or data that you put into this service are public.

informR documentation built on May 1, 2019, 9:22 p.m.