clear I;
w=zeros(1,8); % 8=n+1
for i=0:15; % 15=2^k-1
    ib=dec2bin(i,4); % 4=k
    for j=1:length(ib)
        I(j)=str2num(ib(j));
    end
    C=koder7_4(I); % odgovarajuci koder
    q=sum(C);
    w(q+1)=w(q+1)+1;
end
stem(0:7,w) % 7=n
w