/usr/share/plplot_octave/peaks.m is in octave-plplot 5.13.0+dfsg-6ubuntu2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | ## [xx, yy, z] = peaks()
##
## return the "well" known MatLab (R) peaks function
## evaluated in the [-3,3] x,y range.
function [xx, yy, z] = peaks()
xx = yy = -3:0.1:3;
[x,y] = meshgrid (xx,yy);
z = 3 * (1-x).^2 .* exp(-(x.^2) - (y+1).^2) - ...
10 * (x/5 - x.^3 - y.^5) .* exp(-x.^2 - y.^2)- ...
1/3 * exp(-(x+1).^2 - y.^2);
## z(z<-1) = -1; ## Jungfraujoch/Interlaken
endfunction
|