kmeans_test.m

来自「patten regnization source从1-14章能运行」· M 代码 · 共 20 行

% 檬扁 内靛合
CBin = [1,1; -1,1; -1,-1; 1, -1; 0,1; 0,-1; 0,0];
hold on
grid on;
scatter(CBin(:,1),CBin(:,2),'r','filled');  %檬扁 内靛合 焊咯林扁  

% 涝仿 罚待 单捞磐 父甸扁
X = zeros(1000,2);

for i = 1:1000
    for j = 1:2
        X(i,j) = randn(1,1)+1;
    end
end

delta = 0.01;
% Kmeans VQ 荐青
[CBout,esq,j] = kmeans(X,7,CBin);
scatter(CBout(:,1),CBout(:,2),'b','filled');
CBout