nncentxt.m

Martin T.Hagan等著,戴葵等译,神经网络设计,机械工业出版社,一书的所有例程

function h = nncentxt(s)
%NNCENTXT Neural Network Design utility function.

% First Version, 8-31-95.

%	NNCENTXT(S)
%	  S - String.
%	Displays string S in current axis, and returns handle.

if nargin == 0, s = 'Neuro-Waffle'; end

x = get(gca,'xlim');
y = get(gca,'ylim');
h = text(sum(x)*0.5,sum(y)*0.5,s);
set(h,'horizontal','center');
set(h,'fontweight','bold');