Kolos_2

Z = [1 9 2 3 4 5 2 7 2 5 2 3 9 6 5 4 2 5 7 3 5 6 2 7 6 5 2 5 3 6 2 1 9 2 3 4 5 2 7 2 5 2 3 9 1 9 2 3 4 5 2 7 2 5 2 3 9 1 9 2 3 4 5 2 7 2 5 2 3 9 3]
x = mean(Z)
sd = std(Z)
Y = Z(Z>x+sd|Z<x-sd);
Z(Z>x+sd|Z<x-sd)=[];
while length(Z)>12
      A=Z(1:12);
      A = reshape(A,[4,3])
      Z(1:12)=[];
endwhile
q = 12 - length(Z)
Q = zeros(1,q)
F =[Z,Q]
X = reshape(F,[4,3])