rand_tong_yong.m

来自「模拟退火法(Sb除Sw),神经网络的好资料!!!!!!!!!1」· M 代码 · 共 28 行

function y=Rand_Tong_yong(End,Sum)%---产生数值为1~End的Sum个互异的数
% Sum=3;
while (1)
    for i=1:Sum
        A(i)=Wh_rand(End);
    end
    T=0;
    for i=1:Sum
        for j=1:Sum
            if and((i~=j),A(i)==A(j))
                T=1;%代表已经出现重复值
            end
        end
    end
    if (T==0)
        break;
    end
end%-------产生四个介于1~6的随机数，作为随机取样的坐标（就是所谓的邻域）

for i=1:Sum
    for j=1:Sum
        if A(i)<A(j)
            T=A(i);A(i)=A(j);A(j)=T;
        end
    end
end%将这四个数按升序排序
y=A;