1
! @(#)knn.prg 19.1 (ES0-DMD) 02/25/03 13:27:23
2
!++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
10
! F. Murtagh, ST-ECF, Garching. Version 1.0; 16 June 1986
18
! K-Nearest Neighbours Discriminant Analysis,
19
! Multivariate statistics, Pattern recognition.
23
! @@ KNN Training_table No._of_gp.1_members Test_table No._of_NNs
27
! Input training set table name.
28
! Number - first "number" rows of the input training set belong to
29
! group 1; the remainder belong to group 2.
30
! Test set table name.
31
! Number of nearest neighbours (default: 3)
33
!-------------------------------------------------------------------
35
DEFINE/PARAM P1 ? TABLE "Enter input table"
36
DEFINE/PARAM P2 ? NUMBER "Enter no of rows used as training set"
37
DEFINE/PARAM P3 ? TABLE "Enter set table name"
38
DEFINE/PARAM P4 3 NUMBER "no of nearest neighbours""
39
WRITE/KEYW INPUTI/I/1/1 'P2'
40
WRITE/KEYW INPUTI/I/2/1 'P4'