%鑒于是求序列的相關性,故先令相關值為0,如果序列的相置的位相同,則加1.
function [selcon]=sel_con(seq);
N=length(seq);
for i=1:N        %初始化相關值.
    selcon(i)=0;
end
for i=0:(N-1)
    for j=1:(N-i)
        if seq(j)==seq(j+i)
            selcon(i+1)=selcon(i+1)+1;  %注意數組是從1開始取的.
        end
    end
    for j=(N-i+1):(N-1)                 %后來添加的
        if seq(j)==seq(j-N+i)           %后來添加的
            selcon(i+1)=selcon(i+1)+1;  %后來添加的
        end                             %后來添加的
    end
end