R/probability.couple.R

probability.couple <-function(Prob){
	out<-.C("probabilitycouple",background=as.double(Prob),Probtrans=double(16))
	return(out$Probtrans)
	}

Try the MEET package in your browser

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

MEET documentation built on May 2, 2019, 1:45 p.m.