MATLAB之父_编程实践 源代码

《MATLAB之父：编程实践》书籍中例子的源代码。

function bigscreen（arg）
%BIGSCREEN  Set graphics properties for large audiences.
%   BIGSCREEN with no arguments or BIGSCREEN（‘on‘） sets the figure
%   window size and location and several Handle Graphics font and
%   line sizes to values appropriate for big screen projectors.
%
%   BIGSCREEN（‘off‘） sets them back to their “factory“ defaults.

%   Copyright 2014 Cleve Moler
%   Copyright 2014 The MathWorks Inc.

if nargin == 0 | isequal（arg‘on‘）
   % Turn on bigscreen
   s = get（0‘screensize‘）;
   w = 1024;
   h = 768;
   fs = 14;
   lw = 2;
   if s（3） == 1024
      w = 768;
      h = 672;
      fs = 12;
   end
   if s（3） == 800
      w = 680;
      h = 510;
      fs = 12;
   end
   x = （s（3）-w）/2;
   y = （s（4）-h）/2;
   set（0‘defaultfigureposition‘[x y w h] ...
      ‘defaultuicontrolfontsize‘fs ...
      ‘defaulttextfontsize‘fs ...
      ‘defaultaxesfontsize‘fs ...
      ‘defaultlinemarkersize‘fs ...
      ‘defaultlinelinewidth‘lw ...
      ‘defaultuicontrolfontweight‘‘bold‘ ...
      ‘defaulttextfontweight‘‘bold‘ ...
      ‘defaultaxesfontweight‘‘bold‘）

elseif isequal（arg‘off‘）
   % Turn off bigscreen
   set（0‘defaultfigureposition‘‘factory‘ ...
      ‘defaultuicontrolfontsize‘‘factory‘ ...
      ‘defaulttextfontsize‘‘factory‘ ...
      ‘defaultaxesfontsize‘‘factory‘ ...
      ‘defaultlinemarkersize‘‘factory‘ ...
      ‘defaultlinelinewidth‘‘factory‘ ...
      ‘defaultuicontrolfontweight‘‘factory‘ ...
      ‘defaulttextfontweight‘‘factory‘ ...
      ‘defaultaxesfontweight‘‘factory‘）;

else
   error（‘Unfamiliar argument‘）
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件        1650  2014-12-24 03:06  exm_2014\bigscreen.m
     文件        2286  2014-12-24 03:06  exm_2014\biorhythm.m
     文件        1427  2014-12-24 03:06  exm_2014\bouncer.m
     文件        3451  2014-12-24 03:06  exm_2014\brownian3.m
     文件        1254  2014-12-24 03:06  exm_2014\calendar_recap.m
     文件         239  2014-12-24 03:06  exm_2014\checkerboard.m
     文件        4679  2014-12-24 03:06  exm_2014\clefs.mat
     文件        1334  2014-12-24 03:06  exm_2014\clockex.m
     文件        3809  2014-12-24 03:06  exm_2014\Contents.m
     文件         261  2014-12-24 03:06  exm_2014\dot2dot.m
     文件        1281  2014-12-24 03:06  exm_2014\durerperm.m
     文件         762  2014-12-24 03:06  exm_2014\easter.m
     文件        7952  2014-12-24 03:06  exm_2014\exmapp.m
     文件      186592  2014-12-24 03:06  exm_2014\exmapp_pix.mat
     文件        1367  2014-12-24 03:06  exm_2014\exmlogo.m
     文件     1024403  2015-11-25 06:27  exm_2014\Experiments with MATLAB.mlappinstall
     文件         304  2014-12-24 03:06  exm_2014\expex.m
     文件        1672  2014-12-24 03:06  exm_2014\exponential_recap.m
     文件        1509  2014-12-24 03:06  exm_2014\expshow.m
     文件      191572  2014-12-24 03:06  exm_2014\fern.jpg
     文件        1317  2014-12-24 03:06  exm_2014\fern.m
     文件         993  2014-12-24 03:06  exm_2014\fern_recap.m
     文件         322  2014-12-24 03:06  exm_2014\fibnum.m
     文件         281  2014-12-24 03:06  exm_2014\fibonacci.m
     文件        1235  2014-12-24 03:06  exm_2014\fibonacci_recap.m
     文件        2265  2014-12-24 03:06  exm_2014\finitefern.m
     文件        1053  2014-12-24 03:06  exm_2014\fixedpoint.m
     文件         455  2014-12-24 03:06  exm_2014\friday13.m
     文件        3421  2014-12-24 03:06  exm_2014\golden_spiral.m
     文件         795  2014-12-24 03:06  exm_2014\goldfract.m
     文件         225  2014-12-24 03:06  exm_2014\goldie.m
............此处省略62个文件信息