function  [rate, cm] = classifAccuracy(impureGuesses, truePrototypes, ...
				       prototypes)
% (An old function, likely to be removed. It is easier to handle
% classification tasks by using class indices than by using class
% prototype vectors.)

[pureGuesses, guessInd] = classifToClosest(impureGuesses, prototypes);
[truePrototypes, trueInd] = classifToClosest(truePrototypes, prototypes);

cm = confusionMatrixFromIndices(guessInd, trueInd);
rate = confusionMatrix_getRates(cm);
