###--- >>> `which.is.max' <<<----- Find Maximum Position in Vector

	## alias	 help(which.is.max)

##___ Examples ___:

##Don't run: 
##D pred <- predict(nnet, test)
##D table(true, apply(pred,1,which.is.max))

## Keywords: 'utilities'.


