第２回−２　以下のプログラムを作って実行してみましょう。

proc gslide;
title1 h=4 f=triplex c=magenta 'Welcome';
title2 h=2 f=swissx c=green 'to';
title3 h=6 f=titalic c =yellow 'SAS / GRAPH';

data d1;
do x=-5 to 5 by 0.5;
do y=-5 to 5 by 0.5;
t=1/exp(sqrt(x*x+y*y));
z=t*cos(x*x+y*y);
output;
end;
end;

proc g3d data=d1;
plot y*x=z/tilt=0 10 20 30 40 50 60 70 80 90;
title;
run;