示例文件

参考：【Matlab】如何规范地编写一个MATLAB函数文件

  2. function spir_len = spirallength(d, n, lcolor)
  3. % SPIRALLENGTH plot a circle of radius as r in the provided color and calculate its area 
  4. % 输入参数： 
  5. %   d: 螺旋的旋距
  6. %   n: 螺旋的圈数
  7. %   lcolor：画图线的颜色
  8. % 输出参数：
  9. %   spir_len：螺旋的周长
  10. % 调用说明：
  11. %   spirallength(d,n):以参数d,n画螺旋线，螺旋线默认为蓝色
  12. %   spirallength(d,n,lcolor):以参数d,n,lcolor画螺旋线
  13. %   spir_len = spirallength(d,n):计算螺旋线的周长，并以蓝色填充螺旋线
  14. %   spir_len = spirallength(d,n,lcolor):计算螺旋线的周长，并以lcolor颜色填充螺旋线
  16. % 版本号V1.0，编写于1999年9月9号，修改于1999年9月10号，作者：亚索
  18. if nargin > 3
  19.     error('输入变量过多！');
  20. elseif nargin == 2
  21.     lcolor = 'b'; % 默认情况下为蓝色
  22. end
  24. j = sqrt(-1); 
  25. phi = 0 : pi/1000 : n*2*pi; 
  26. amp = 0 : d/2000 : n*d; 
  27. spir = amp .* exp(j*phi); 
  29. if nargout == 1
  30.     spir_len = sum(abs(diff(spir))); 
  31.     fill(real(spir), imag(spir), lcolor); 
  32. elseif nargout == 0
  33.     plot(spir, lcolor); 
  34. else
  35.     error('输出变量过多！'); 
  36. end
  38. axis('square');