R/sFM.R

"sFM" <-
function(M1,M2) {
  res <- sum(M1*M2) / sqrt(sum(M1*M1) * sum(M2*M2));
	return(res);
}

Try the mosclust package in your browser

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

mosclust documentation built on June 8, 2025, 11:23 a.m.