R/para_trans.R

Defines functions para_trans

para_trans <-
function(transmat) {
M = dim(transmat)[1]
A = matrix(0,M,M-1)
for ( i in 1:(M-1)) {
    A[,i] = log(transmat[,i]/transmat[,M])
	}
	return(A)
}

Try the NHMSAR package in your browser

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

NHMSAR documentation built on Feb. 9, 2022, 9:06 a.m.