R/coalgen.default.R

coalgen.default <-
function(sample,...)
{
	sample<-as.matrix(sample)
	out<-1
	class(out)<-"coalgen"
	out
}
JuliaPalacios/coalsieve documentation built on May 8, 2019, 4:41 p.m.