learning - %Cycle Error %if k==1 E=(1/2)*(Dip-o)^2+E; end...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
%learning.m % ymaker1; start10; E=0.1; k=0; p=1; ERROR=zeros(1,20); TRAINING_STEP=zeros(1,20); t=1; while E>0 E=0; p=1; while p<=P; for i=1:R yp=y(:,p); Dip=d(i,p); O=W(i,:)*y(:,p); o=-1; if O>o o=1; end W(i,:)=W(i,:)+(1/2)*LEARNING_CONSTANT*(Dip-o)*yp';
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: %Cycle Error %if k==1 E=(1/2)*(Dip-o)^2+E; end p=p+1; k=k+1; end ERROR(1,t)=E; t=t+1; end e TRAINING_STEP=k; %---------------------------------...
View Full Document

This note was uploaded on 07/13/2011 for the course ECE 501 taught by Professor Deniz during the Spring '11 term at Istanbul Universitesi.

Ask a homework question - tutors are online