R/compMatProbMLR.R

Defines functions compMatProbMLR

compMatProbMLR<-function(trees,newData,n.lev){
	mat<-matrix(0,nrow(newData),n.lev)
	for(j in 2:n.lev)
		mat[,j]<-predict(trees[[j-1]],newData,2)
	mat<-exp(mat)
	mat/rowSums(mat)
}

Try the logicFS package in your browser

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

logicFS documentation built on Nov. 8, 2020, 5:23 p.m.