R/ACTOR.R

ACTOR <-
function(x, y){
	x=VMATCH(rep(1, length(x)), x)
	y=VMATCH(rep(1, length(y)), y)
	actor=ifelse(x<y,2,1)	
actor
}

Try the MoLE package in your browser

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

MoLE documentation built on May 2, 2019, 3:02 p.m.