2-17.m

来自「神经网络理论与MATLAB7这本书的各章节的源程序」· M 代码 · 共 13 行

%函数round将随机数转换为与其最接近的整数
P = round(rand(1,20)); 
%[]中的后半部分为判断语句，返回0或1
T = [0 (P(1:end-1)+P(2:end) == 2)]; 
%函数con2seq将并发向量转换为序贯向量
Pseq = con2seq(P); 
Tseq = con2seq(T);
%网络第1层传递函数为tansig,第二层为logsig,训练函数为默认为traingdx
net = newelm([0 1],[10 1],{'tansig','logsig'}); 
%训练的最大步数为默认值100
net = train(net,Pseq,Tseq);
Y = sim(net,Pseq)