function ShowSparse1()
% Illustrates the sparse format and its display

% The standard "full" format...
A = magic(3)
% The sparse format...
spA = sparse(A)

% A banded example...
fullA = tril(triu(randn(30,30),-5),3);
spA = sparse(fullA);
% Display its sparsity...
spy(spA)
set(gca,'fontsize',16)
% Display nnz in large font...
set(get(gca,'xlabel'),'fontsize',16)
shg