pascalabcnet/InstallerSamples/MachineLearning/08_Datasets/01_MakeBlobs.pas
Mikhalkovich Stanislav a40a45d47a function PascalABCDirectory: string;
ML - Datasets, мелкие правки, примеры
2026-03-10 13:32:40 +03:00

20 lines
527 B
ObjectPascal

// MakeBlobs синтетический датасет.
// Демонстрирует генерацию кластеризованных данных и их визуализацию.
uses MLABC, PlotML;
begin
var centers := 3;
var (X,y) := Datasets.MakeBlobs(
n := 600,
centers := centers,
clusterStd := 1.2,
seed := 1
);
Plot.Title('MakeBlobs синтетический датасет');
var xs := X.Col(0);
var ys := X.Col(1);
Plot.Points(xs, ys, LabelsToInts(y), size := 4);
end.