topic Re: Automating annotations for sgpanel - can it be done? in Graphics Programming

topic Re: Automating annotations for sgpanel - can it be done? in Graphics Programming https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936745#M24825 <P>So brilliant and simple. Thank you!</P> Tue, 23 Jul 2024 11:06:08 GMT grsanford 2024-07-23T11:06:08Z Automating annotations for sgpanel - can it be done? https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936654#M24822 <P>Hello, </P><P>I have used sganno as a means to add letters of significance above figures for a long time. It works but it is exceedingly cumbersome adjusting x/y coordinates if there are many letters/bars/boxes. The letters are never equidistant or perfectly centered above whiskers and the second you change any formatting you have to begin monkeying around with x/y coordinates again. There MUST be a streamlined or more efficient way to do this. Below is code for the attached graph illustrating my point. </P><P> </P><DIV>data anno; </DIV><DIV>length function $8. label $200.;</DIV><DIV> </DIV><DIV>function="text"; label="Change in SOC, 1989 to 2019 (Mg ha(*ESC*){sup '-1'} yr(*ESC*){sup '-1'})";</DIV><DIV>rotate = 90; X1 = 1.5; Y1 = 50; width = 1000; TEXTSIZE = 8;</DIV><DIV>output;</DIV><DIV> </DIV><DIV><SPAN>function="text"; label="C"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 27.025; Y1 = 63; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="C"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 36.575; Y1 = 65; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="C"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 46.125; Y1 = 65; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="B"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 55.675; Y1 = 68; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="B"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 65.225; Y1 = 71.5; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="A"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 74.775; Y1 = 84; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="A"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 84.325; Y1 = 93; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="C"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 27.025; Y1 = 18.5; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="BC"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 36.575; Y1 = 20.5; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="C"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 46.125; Y1 = 16.5; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="B"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 55.675; Y1 = 22; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="B"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 65.225; Y1 = 24; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="A"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 74.775; Y1 = 36; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV> </DIV><DIV><SPAN>function="text"; label="A"; *add letter denoting statistical grouping;</SPAN></DIV><DIV>    rotate = 0; </DIV><DIV><SPAN>X1 = 84.325; Y1 = 44; ANCHOR = "center";</SPAN></DIV><DIV><SPAN>width = 30; TEXTSIZE = 10; TEXTSTYLE="normal";</SPAN></DIV><DIV><SPAN>output;</SPAN></DIV><DIV><SPAN>run;</SPAN></DIV><DIV> </DIV><DIV>ods graphics on / noborder;</DIV><DIV> </DIV><DIV>proc sgpanel data=fig1 noautolegend sganno=anno;</DIV><DIV>panelby dpt / rows=2 columns=1 novarname uniscale=column;</DIV><DIV>   vbox _value_ / group=sys nomean lineattrs=(color=black) medianattrs=(color=black) whiskerattrs=(color=black) capshape=none;</DIV><DIV>   refline 0 / lineattrs=(color=crimson);</DIV><DIV>   rowaxis label=" " offsetmax=.1;</DIV><DIV>   keylegend / title=" " position=bottom noborder;</DIV><DIV>   format dpt dpt.;</DIV><DIV>   format sys sys.;</DIV><DIV>run;</DIV><DIV> </DIV><DIV> </DIV><DIV><span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Example Figure.jpg" style="width: 480px;"><img src="https://communities.sas.com/t5/image/serverpage/image-id/98592iABA16A3F731713E0/image-size/large?v=v2&px=999" role="button" title="Example Figure.jpg" alt="Example Figure.jpg" /></span></DIV><P> </P> Mon, 22 Jul 2024 19:27:13 GMT https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936654#M24822 grsanford 2024-07-22T19:27:13Z Re: Automating annotations for sgpanel - can it be done? https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936684#M24823 <P>The TEXT statement in SGPLOT / SGPANEL  or TEXTPLOT in GTL may be the right solution for you to place text inside the graph.  You could also see if the HIGHLABEL option of HIGHLOW plot can be useful for this.</P> Mon, 22 Jul 2024 21:10:42 GMT https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936684#M24823 Jay54 2024-07-22T21:10:42Z Re: Automating annotations for sgpanel - can it be done? https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936700#M24824 <PRE><CODE class=" language-sas">data have; set sashelp.heart; keep sex bp_status weight; run; ods select none; ods output SGPanel=box ; proc sgpanel data=have noautolegend ; panelby sex / rows=2 columns=1 novarname uniscale=column; vbox weight/category=BP_Status nooutliers; run; ods select all; proc sort data=box;by Sex BOX_WEIGHT_X_BP_STATUS____X; run; proc transpose data=box(where=(BOX_WEIGHT_X_BP_STATUS___ST in ('MIN' 'Q1' 'MEDIAN' 'Q3' 'MAX' ))) out=want; by Sex BOX_WEIGHT_X_BP_STATUS____X; var BOX_WEIGHT_X_BP_STATUS____Y; id BOX_WEIGHT_X_BP_STATUS___ST; run; data want; set want; label=choosec(mod(_n_,4)+1,'A', 'B', 'BC', 'C'); run; proc sgpanel data=want noautolegend ; panelby sex / rows=2 columns=1 novarname uniscale=column; highlow x=BOX_WEIGHT_X_BP_STATUS____X low=Q1 high=Q3/group=BOX_WEIGHT_X_BP_STATUS____X type=bar barwidth=0.4 lineattrs=(color=black); scatter x=BOX_WEIGHT_X_BP_STATUS____X y=max/datalabel=label labelstrip datalabelpos=top datalabelattrs=(size=10) markerattrs=(size=0); highlow x=BOX_WEIGHT_X_BP_STATUS____X low=median high=median/group=BOX_WEIGHT_X_BP_STATUS____X type=bar barwidth=0.4 lineattrs=(color=black) nofill; highlow x=BOX_WEIGHT_X_BP_STATUS____X low=q3 high=max/group=BOX_WEIGHT_X_BP_STATUS____X lineattrs=(color=black); highlow x=BOX_WEIGHT_X_BP_STATUS____X low=min high=q1/group=BOX_WEIGHT_X_BP_STATUS____X lineattrs=(color=black); colaxis type=discrete; rowaxis label=" " offsetmax=.1; refline 150 / lineattrs=(color=crimson); run; </CODE></PRE> <P><span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Ksharp_0-1721699061848.png" style="width: 400px;"><img src="https://communities.sas.com/t5/image/serverpage/image-id/98613i64643ABBDE5CB5FC/image-size/medium?v=v2&px=400" role="button" title="Ksharp_0-1721699061848.png" alt="Ksharp_0-1721699061848.png" /></span></P> <P> </P> Tue, 23 Jul 2024 01:44:29 GMT https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936700#M24824 Ksharp 2024-07-23T01:44:29Z Re: Automating annotations for sgpanel - can it be done? https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936745#M24825 <P>So brilliant and simple. Thank you!</P> Tue, 23 Jul 2024 11:06:08 GMT https://communities.sas.com/t5/Graphics-Programming/Automating-annotations-for-sgpanel-can-it-be-done/m-p/936745#M24825 grsanford 2024-07-23T11:06:08Z