R/rwish.R

rwish <-
function (S, df) {
	.Call( "rwish", S, df:(df - ncol(S) + 1), PACKAGE = "BayesComm" )
}
goldingn/BayesComm documentation built on May 17, 2019, 7:41 a.m.