Cau 10 chuyen de

r1 = randperm(59);
r2 = randperm(71);
r3 = randperm(48);

data1 = [];
for i = 1:59
    randdata1 = [data1;datas(r1(1,i),:)];
    data1= randdata1;
end


data2 = [];
for i = 1:71
    randdata2 = [data2;datas(r2(1,i)+59 ,:)];
    data2= randdata2;
end


data3 = [];
for i = 1:48
    randdata3 = [data3;datas(r3(1,i)+71,:)];
    data3= randdata3;
end
randdatas = centrage([data1; data2; data3]);


%Divide data into Train and Test
X_rand_Train=[randdatas(1:36,:);randdatas(60:102,:);randdatas(131:155,:)];
Labels_rand_Train=[ones(36,1);2ones(43,1);3ones(25,1)];


Y_rand_Test=[randdatas(37:59,:);randdatas(103:130,:);randdatas(156:178,:)];
Labels_rand_Test=[ones(23,1);2ones(28,1);3ones(23,1)];

for i_Number_KNN=1:20
ACC_rand_centrage(:,i_Number_KNN)= using_KNN(X_rand_Train,Y_rand_Test,Labels_rand_Train',Labels_rand_Test',i_Number_KNN)
end


acc_knn = using_KNN(X_rand_Train,Y_rand_Test,Labels_rand_Train',Labels_rand_Test',3)
[idxbest, Cbest, sumDbest, Dbest] = kmeans(Y_rand_Test, 3)
score_data = accuracy(Labels_rand_Test, idxbest)