* 출처 : http://support.sas.com/kb/56/546.html
/* Subset the map to a smaller area */
data maparea;
set mapsgfk.south_korea;
where id1='KR-11';
run;
/* Make the annotate macros available */
%annomac;
/* Determine the center of the map areas */
%centroid(maparea,centers,id);
/* Define an annotate data set to label the map areas */
/* with the national and English characters */
data names;
merge centers(in=a) mapsgfk.south_korea_attr;
by id;
if a;
retain xsys '2' ysys '2' when 'a' function 'label';
length text $20 color $8;
text=input(IdnameU, $uesc50.);
position='5'; color='black'; size=2;
output;
text=trim(idname);
position='8'; color='gray11'; size=1.5;
output;
run;
/* Use a UTF8 SAS session to display the map with labels */
title 'Label map areas with national characters';
proc gmap data=maparea map=maparea;
id id1 id ;
choro id / anno=names coutline=graybb statistic=first nolegend;
run;
quit;
