A=[57 71 97 101];m=120;n=3;
B = repmat(A,m,n);
q=randperm(m*n);q=reshape(q,[],12);
C=B(q);
D=cumsum(C');a=[];[r c]=size(q);
[i j]=find(D==800);kk=length(i),ak=1;a=[];%
% isempty(kk)
if kk>0
for ii=1:kk;
ir=i(ii);jc=j(ii);
a=C(1:ir,jc)
end
end
A=[57 71 97 101];m=120;n=3;
B = repmat(A,m,n);
q=randperm(m*n);q=reshape(q,[],12);
C=B(q);
D=cumsum(C');a=[];[r c]=size(q);
[i j]=find(D==800);kk=length(i),ak=1;a=[];%
% isempty(kk)
if kk>0
for ii=1:kk;
ir=i(ii);jc=j(ii);
a=C(1:ir,jc)
end
end