63
5.2. Metoda NM
Rys. 5.8. Przykłady klas, dla których średnia nie jest dobrym wzorcem dla całej klasy
modę [1.. numclass][l.. dim] - wartości modalne (M')
i zmodyfikować funkcję dist, której pierwszy parametr ma obecnie (jako tablica) wymiar dim a nie (dim + 1) jak poprzednio. Tę zmodyfikowaną funkcję nazwiemy distl
procedurę NMrec (obj, var rec); begin
rec := 0; min MaxReal; for i := 1 to numclass do if distl(mode[i), obj) < min then begin rec := i;
min := distl(mode[i], obj) end
end