clear path;
wr = [0;0];

for i=1:1200
	path(i,:) = wr';
	y = (wr'*x')';
	wr = wr + (mu*(ystar - y)'*x)';
end

path(i,:)
plot(path(:,1), path(:,2));