gusucode.com > 《matlab在数学建模中的应用》一书 所有的 源代码 > 第15章/P15-3/CombineTwoUnits.m

    %子函数，建议放于独立的m文件中，命名为CombineTwoUnits.m
%两个隐节点合并
function[W1Ex,W2Ex]=CombineTwoUnits(unit1,unit2,a,b,W1Ex,W2Ex)
[xxx,BiasCol]=size(W2Ex);
W2Ex(:,unit1)=W2Ex(:,unit1)+a*W2Ex(:,unit2);
W2Ex(:,BiasCol)=W2Ex(:,BiasCol)+b*W2Ex(:,unit2);
W1Ex(unit2,:)=[];
W2Ex(:,unit2)=[];