function [ net ] = gabptrain( gaP,bpP,P,T )%gabptrain 結(jié)合遺傳算法的神經(jīng)網(wǎng)絡(luò)訓(xùn)練%  gaP 為遺傳算法的參數(shù)信息.[遺傳代數(shù) 最小適應(yīng)值]。%  bpP 為神經(jīng)網(wǎng)絡(luò)參數(shù)信息。[最大迭代次數(shù)　最小誤差]%  P 為樣本數(shù)組%  T 為目標(biāo)數(shù)組%%%% 輸入?yún)?shù)賦值開(kāi)始 %%%%%%%%%%%%%%%%%%%%%%%% 方便調(diào)試程序用，程序調(diào)試時(shí)去掉這部分的注釋gaP = [100 0.00001];bpP = [500 0.00001];[W1, B1, W2, B2] = getWBbyga(gaP);paraments=bpP;    % 神經(jīng)網(wǎng)絡(luò)參數(shù)信息。[最大迭代次數(shù)　最小誤差]%%%% 輸入?yún)?shù)賦值結(jié)束 %%%%%%%%%%%%%%%%%%%%%%%%[W1, B1, W2, B2] = getWBbyga(gaP);net = initnet(W1, B1, W2, B2,bpP);net = train(net,P,T);