subplot_title

 subplot_title - displays a title for a subplot, across all subplots

 Usage: title_handle = subplot_title(title_string)

 Displays a title for a set of subplots at the top of the current figure.
 Said title goes across all of the subplots.  Returns the handle to the
 subplot.

 subplot_title is a modified version of code by Keith Rogers and posted
 on comp.soft-sys.matlab on 1995/05/14 in the thread entitled
 "Global title for subplot".

 This function is part of froi, available from http://froi.sourceforge.net,
 and is governed under the terms of the Artistic License.

 $Id$

0001 function title_handle = subplot_title(title_string)
0002 % subplot_title - displays a title for a subplot, across all subplots
0003 %
0004 % Usage: title_handle = subplot_title(title_string)
0005 %
0006 % Displays a title for a set of subplots at the top of the current figure.
0007 % Said title goes across all of the subplots.  Returns the handle to the
0008 % subplot.
0009 %
0010 % subplot_title is a modified version of code by Keith Rogers and posted
0011 % on comp.soft-sys.matlab on 1995/05/14 in the thread entitled
0012 % "Global title for subplot".
0013 %
0014 % This function is part of froi, available from http://froi.sourceforge.net,
0015 % and is governed under the terms of the Artistic License.
0016 %
0017 % $Id$
0018 
0019 ax = gca;
0020 fig = gcf;
0021 
0022 title_handle = axes('position',[.1 .80 .8 .05],'Box','off','Visible','off');
0023 
0024 title(title_string);
0025 set(get(gca,'Title'),'Visible','On');
0026 set(get(gca,'Title'),'FontSize',24);
0027 set(get(gca,'Title'),'FontWeight','bold');
0028 axes(ax);