It is a special Chinese picture . Have fun.
data have;
pi=constant('pi');
/*plot the left white part*/
id=1;
do i=0.5*pi to 1.5*pi by 0.01;
x=cos(i);y=sin(i);output;
end;
do i=1.5*pi to 0.5*pi by -0.01;
x=0.5*cos(i);y=0.5*sin(i)-0.5;output;
end;
do i=-0.5*pi to 0.5*pi by 0.01;
x=0.5*cos(i);y=0.5*sin(i)+0.5;output;
end;
/*plot the right dark part*/
id=2;
do i=0.5*pi to -0.5*pi by -0.01;
x=cos(i);y=sin(i);output;
end;
do i=1.5*pi to 0.5*pi by -0.01;
x=0.5*cos(i);y=0.5*sin(i)-0.5;output;
end;
do i=-0.5*pi to 0.5*pi by 0.01;
x=0.5*cos(i);y=0.5*sin(i)+0.5;output;
end;
/*plot the big circle with dark border*/
id=3;
do i=0 to 2*pi by 0.01;
x1=cos(i);y1=sin(i);output;
end;
/*plot the bottom little white pie*/
id=4;
do i=0 to 2*pi by 0.01;
x2=0.15*cos(i);y2=0.15*sin(i)-0.5;output;
end;
/*plot the top little black pie*/
id=5;
do i=0 to 2*pi by 0.01;
x3=0.15*cos(i);y3=0.15*sin(i)+0.5;output;
end;
run;
title ;
proc sgplot data=have aspect=1 noautolegend noborder;
styleattrs datacolors=(white black);
polygon x=x y=y id=id/group=id fill ; /*plot the left and right part*/
polygon x=x2 y=y2 id=id/ fill fillattrs=(color=white) ; /*plot the bottom little white pie*/
polygon x=x3 y=y3 id=id/ fill fillattrs=(color=black) ; /*plot the top little black pie*/
series x=x1 y=y1/lineattrs=(color=black thickness=2); /*plot the big circle with dark border*/
xaxis display=none;
yaxis display=none;
run;
@Ksharp Very nice. Requesting you to please add some /*comments*/ in the code to help anybody understand. Thank you in advance!
Thank you so much!!!!!!!!!!!
Nice graph!
Very nice and fun!
Are you ready for the spotlight? We're accepting content ideas for SAS Innovate 2025 to be held May 6-9 in Orlando, FL. The call is open until September 25. Read more here about why you should contribute and what is in it for you!
Learn how use the CAT functions in SAS to join values from multiple variables into a single value.
Find more tutorials on the SAS Users YouTube channel.