Skip to content

Commit

Permalink
Tidying the gallery.
Browse files Browse the repository at this point in the history
  • Loading branch information
gradywright committed May 23, 2017
1 parent 383d42b commit 6789ce8
Showing 1 changed file with 3 additions and 6 deletions.
9 changes: 3 additions & 6 deletions +cheb/gallerysphere.m
Expand Up @@ -170,7 +170,7 @@
% Compute a random spherefun
f = randnfunsphere(0.079,'monochromatic');
fa = f;
type = 1;
type = 4;
clrmap = gray(2);
% Set the color axis so that the transition from white to black is
% exactly at the value zero.
Expand Down Expand Up @@ -238,10 +238,8 @@
ptitle = [name ', rank = ' num2str(length(f))];
% Determine the type of plot to make
if type==1
% Otherwise, plot the function.
%plot(f)
% Plot the function with a grid
surf(f,'grid','k-')
plot(f)
axis off, title(ptitle)
elseif type==2
contour(f)
Expand All @@ -251,8 +249,7 @@
contour(f,cntrlvl,'k-'), hold off
axis off, title(ptitle)
else
% plot(f)
surf(f,'grid','k-')
plot(f)
axis off, title(ptitle)
end

Expand Down

0 comments on commit 6789ce8

Please sign in to comment.