R/calcMaxBasisDim.R

calcMaxBasisDim <-
function(bicMat, basis_seq = seq(3,51,2)){
	optBasisDim 	<- basis_seq[max(apply(bicMat, 2, which.min))]
	return(optBasisDim)
}
stefanrameseder/PartiallyFD documentation built on May 29, 2019, 9:50 a.m.