24 lines
722 B
ObjectPascal
24 lines
722 B
ObjectPascal
|
// В этом примере VarianceThreshold удаляет признак,
|
|||
|
|
// у которого нет разброса значений.
|
|||
|
|
|
|||
|
|
uses MLABC;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
var X := new Matrix(4, 3);
|
|||
|
|
X[0, 0] := 1; X[0, 1] := 10; X[0, 2] := 5;
|
|||
|
|
X[1, 0] := 2; X[1, 1] := 10; X[1, 2] := 6;
|
|||
|
|
X[2, 0] := 3; X[2, 1] := 10; X[2, 2] := 7;
|
|||
|
|
X[3, 0] := 4; X[3, 1] := 10; X[3, 2] := 8;
|
|||
|
|
|
|||
|
|
Println('Размер до VarianceThreshold: ', X.RowCount, 'x', X.ColCount);
|
|||
|
|
|
|||
|
|
var vt := new VarianceThreshold(0.001);
|
|||
|
|
vt.Fit(X);
|
|||
|
|
var X2 := vt.Transform(X);
|
|||
|
|
|
|||
|
|
Println('Размер после VarianceThreshold: ', X2.RowCount, 'x', X2.ColCount);
|
|||
|
|
Println;
|
|||
|
|
Println('Преобразованные данные:');
|
|||
|
|
X2.Println;
|
|||
|
|
end.
|