BP_Prince.m

function [BPnet,tr] = BP_Prince(Input,Output,trainFcn,epochs,goal,lr,ly,fail,grad)

% 初始化网络

net = feedforwardnet(ly,trainFcn);

% 网络参数
net = init(net); 
net.trainParam.epochs = epochs;
net.trainParam.goal = goal;
net.trainParam.lr = lr;
net.trainParam.max_fail = fail;
net.trainParam.min_grad = grad;

% 训练
[net,tr] = train(net,Input,Output);
BPnet = net;