clear I; w=zeros(1,16); % 16=n+1 for i=0:2047; % 15=2^k-1 ib=dec2bin(i,26); % 11=k for j=1:length(ib) I(j)=str2num(ib(j)); end C=koder15_11(I); % odgovarajuci koder q=sum(C); w(q+1)=w(q+1)+1; end stem(0:15,w) % 15=n w