function [x,y]=frac_tree(x0,y0,v,N)
%FRAC_TREE 函數(shù)用來演示函數(shù)的編寫方法。它以分形樹為背景加以
%   介紹，詳細(xì)內(nèi)容見書中第 3 章。
%
%   [x,y]=frac_tree(x0,y0,v,N)
%   給定初始點(diǎn) x0, y0, 隨機(jī)向量 v 和隨機(jī)點(diǎn)個(gè)數(shù) N, 則可以
%   計(jì)算出分形樹上的 N 個(gè)點(diǎn)坐標(biāo)向量 x 和 y。

%Designed by Prof D Xue (c) 2000
x=[x0; zeros(N-1,1)]; y=[y0; zeros(N-1,1)];
for i=2:N
   vv=v(i);
   if vv<0.05, y(i)=0.5*y(i-1);   
   elseif vv<0.45, 
      x(i)=0.42*(x(i-1)-y(i-1)); y(i)=0.2+0.42*(x(i-1)+y(i-1));
   elseif vv<0.85, 
      x(i)=0.42*(x(i-1)+y(i-1)); y(i)=0.2-0.42*(x(i-1)-y(i-1));   
   else, 
      x(i)=0.1*x(i-1); y(i)=0.1*y(i-1)+0.2;
   end
end