% Blom, fina blommor med polar-diagram
  clear, clf
  n=100;  dfi=2*pi/n; 
  q=0.3;
  m=input('Antal stora blomblad: '); 
  for b=1:m-1   
    b, k=0:n*b;  fi=k*dfi;
    r=(q+cos(fi*m/b))/(q+1); polar(fi,r), pause(1)
  end
