About tc

tc

Interestingly, even cloud-based Excel with Microsoft OneDrive appears to have its problems with complex emoji, getting it right in Edit mode, but wrong in Slideshow mode. 😀 Editor - Cloud (Correct) Slideshow - Cloud (Incorrect) Although Slideshow mode works fine when the OneDrive PowerPoint is opened in Desktop instead of the Cloud (slightly different emoji look though!). Slideshow - Desktop (Correct)

tc

SAS Data Step & Proc Print Emoji Makeover Remember those fun Highlights for Children stories in which words were replaced with pictures to help and engage young readers? Ever wonder what that might look like in a programming language? This WUSS 2025 paper takes a whimsical look at examples of rebus-flavored SAS and SQL code snippets and provides rudimentary SAS and Python preprocessor code snippets to translate text-based programs with emojis back into executable text-only code using both SAS's Unicode string 'K' functions and the Python regex package. Paper available in WUSS 2025 Proceedings: https://www.wuss.org/proceedings/2025/WUSS-2025-Paper-184.pdf Slides (pptx, w/speaker notes) available on Microsoft OneDrive: https://1drv.ms/p/c/de2f46cafc97a22d/EWBG6seBPWVAkvZSabrpwG0BdYYmvl61QvC-pjdYKgvI1w?e=kJ8Rep Slides (pdf) available on Microsoft OneDrive: https://1drv.ms/b/c/de2f46cafc97a22d/EXmiFfLvgBdLh_mYeO7i25ABe7naWCsqUETiX9U1h7UkGg?e=CAD5Ao SAS Proc SQL Emoji Makeover

tc · ‎07-03-2025

A quick SAS ODS Graphics take on a clever pony bead flag craft project. Have a great 4th, all! * Fun With SAS ODS Graphics: Pony Bead 4th of July Flag Craft Project Inspired by iheartcraftythings.com/pony-bead-flag-craft.html; data flag; * Generate points for red/white/blue 'beads' & white stars; do y=1 to 14; * 14 rows of beads; do x=1 to 19; * 19 beads per row; if y>=7 and x<=9 then color=1; * Blue beads for 'canton'; else if y in (1,2,5,6,9,10,13,14) then color=2; * Red beads for stripes; else color=3; * White beads for stripes; output; end; end; x=.;y=.; do y2=7.75 to 13.5 by (13.5-7.75)/3; * 4 rows of stars, distribute evenly; do x2=1.75 to 8.25 by (8.25-1.75)/3; * 4 columns of stars, distribute evenly; output; end; end; * Make a flag using ellipse and scatter plots; ods graphics / antialias height=7in width=9.5in imagefmt=svg noborder; * Make height/width proportional to rows/columns; proc sgplot data=flag noborder noautolegend pad=0 nowall; styleattrs backcolor=cx3C3B6E datacolors=(red white blue); * Navy-ish blue background; symbolchar name=uniStar char='2605'x; * Unicode value for 5-point star; ellipseparm semimajor=.48 semiminor=.48 / fill xorigin=x yorigin=y group=color nomissinggroup; * Red/white/blue 'beads'; scatter x=x y=y / markerattrs=(color=cx3C3B6E symbol=circlefilled size=15pt); * 'Holes' in center of 'beads'; scatter x=x2 y=y2 / markerattrs=(symbol=uniStar color=white size=96pt); * White stars; xaxis display=none values=(.5 to 19.5) offsetmin=0 offsetmax=0; * Suppress axes and minimize padding around markers; yaxis display=none values=(.5 to 14.5) offsetmin=0 offsetmax=0; run;

tc · ‎05-10-2025

A quick change-all-stars-to-hearts fork of the earlier Fun w/SAS ODS Graphics Twinkle-Twinkle-Little-Star Holiday Wreath. Happy Mother's Day, all! * Fun w/SAS ODS Graphics: Happy Mother's Day Wreath of Hearts (Scatter + Text Plots) A fork of earlier Fun w/SAS ODS Graphics Twinkle-Twinkle-Little-Star Holiday Wreath; data wreath; /* Generate points for "wreath" graph */ do frame=1 to 25; /* Randomly change colors of hearts for each frame of GIF to make them twinkle */ tx=0; ty=0; msg="HAPPY*MOTHER'S*DAY!"; output; tx=.; ty=.; /* Happy Mother's Day! message in center of wreath */ do theta=0 to 2*constant("pi")+.1 by (2*constant("pi"))/60; /* Generate 60 points around a circle for hearts on wreath */ do r=1 to .7 by -.075; /* Five con-centric circles of hearts */ x=r*cos(theta); /* A little trigonometry to get x-coordinate */ y=r*sin(theta); /* And y-coordinate */ color=(rand("Integer", 0, 11)); /* Assign a random color for a 12-pastel color ramp */ output; end; end; end; ods graphics / imagefmt=GIF width=5in height=5in noborder; /* Record wreath images */ options nobyline papersize=('5 in', '5 in') animduration=.2 animloop=yes animoverlay printerpath=gif animation=start nodate nonumber; ods printer file='~/momwreath/wreath.gif'; /* Animated GIF filename */ proc sgplot noautolegend aspect=1 noborder nowall pad=0; /* Generate a wreath! */ by frame; /* One image per frame to make hearts twinkle */ styleattrs backcolor=bipb; /* Brilliant purple background color */ symbolchar name=uniHeart char='2764'x; /* Unicode value for heart */ scatter x=x y=y / markerattrs=(symbol=uniHeart size=19pt) colormodel=(cXdda0dd cX87ceeb cX40e0D0 cXfff700 cX00ff7f cXbdfcc9 cXffc0cb cXffa07a cXee82ee cXc8a2c8 cX00cccc cXb573dc) colorresponse=color; * Generate pastel-colored hearts; text x=tx y=ty text=msg / contributeoffsets=none textattrs=(size=30pt weight=bold color=white) splitchar='*' splitpolicy=splitalways contributeoffsets=none; * "Happy Mother's Day!" message; xaxis display=none; yaxis display=none; /* Hide axes */ run; options printerpath=gif animation=stop; /* Stop recording images */ ods printer close;

tc · ‎05-01-2025

Using 2025 NFL Draft data, here's a SAS ODS Graphics scatter + box plot of all 257 draft picks by position. A version with interactive tool tips containing some info on all draftees can be found on GitHub Pages. Go [your team here]! * Fun With SAS ODS Graphics: 2025 NFL Draft Picks At-A-Glance Data from sportingnews.com/us/nfl/news/nfl-draft-picks-2025-live-results/1df59786e708218d8793ee67, espn.com/nfl/draft/rounds, nfl.com/draft/tracker/picks/1/1/2025; proc import datafile='/home/ted.conway/NFL_DRAFT_PICKS_2025.xlsx' out=nflpicks dbms=xlsx replace; * Get data (was copied/pasted/tweaked in Excel); proc sql; * Split up composite field into individual fields; create table nflpicks2a as select round as Round, roundpick as RoundPick, overallpick as OverallPick, team as Team, scan(playerpositionschool,1,',') as Player, scan(playerpositionschool,2,',') as Position, scan(playerpositionschool,3,',') as School from nflpicks p; * Calc total # players at each position; create table nflpicks2b as select p.*, tot.players from nflpicks2a p left join (select position, count(*) as players from nflpicks2a group by 1) tot on p.position=tot.position; * Highlight top picks for each position (and one unexpectedly late pick!); create table nflpicks2 as select n.*, case when toppick is not null or player='Shedeur Sanders' then trim(player)||' '||cats('(',school,')') end as topplayer from nflpicks2b n left join (select position, min(overallpick) as toppick from nflpicks2b group by 1) p on n.overallpick=toppick order by players desc; * Calc xaxis points for reference lines for beginning of each round; select overallpick into :reflines separated by ' ' from nflpicks2 where roundpick=1 and overallpick>1 order by 1; proc sort data=nflpicks2 out=nflpicks3; by overallpick; * Calc positions for Round 1 ... Round 7 headers at top of chart (x2axis); data rounds(keep=round overallpick); * Figure out overall draft # for first pick in each round; set nflpicks3 end=eof; n=_n_; if roundpick=1 or eof; * Also keep overall draft # of last pick; data midpoints(keep=midpoint); * Calc midpoints of round picks for "ROUND N" x2axis headings; set rounds end=eof; lagr=lag(round); lagp=lag(overallpick); if lagr=. then midpoint=0; * First point on x2axis; else midpoint=lagp+(overallpick-lagp)/2; * Points for "ROUND N" headings (N=1-7); output; if eof; midpoint=overallpick; output; * Last point on x2axis (last draft pick #); proc sql; * Save x2axis values for proc sgplot; select distinct midpoint into :midpoints separated by ' ' from midpoints order by 1; ods html5 path='/home/ted.conway/nfldraft2025' body='nfldraft2025.html' options(bitmap_mode="inline"); ods graphics / reset imagemap=on height=9in width=16in imagefmt=png noborder imagename='NFLDRAFT2025'; proc sgplot data=nflpicks2 noautolegend; title height=14pt bold '2025 NFL DRAFT PICKS'; hbox overallpick / group=position fillattrs=(transparency=.6) category=position Fill noOutliers nomean lineattrs=(thickness=0); * Box plot to show distributions/quartiles; scatter x=overallpick y=position / x2axis markerattrs=(symbol=circle size=7pt) tip=(overallpick round RoundPick player position school team); * Scatter plot of individual picks with tooltips; scatter x=overallpick y=position / markerattrs=(symbol=circle size=0pt) datalabel=topplayer datalabelattrs=(size=9pt); * Scatter plot to display names of top picks; yaxis discreteorder=data display=none; * y-axis is player positions; yaxistable position / position=left label="POS" labelattrs=(size=9pt) valueattrs=(size=9pt) labeljustify=left; yaxistable players / position=left stat=MEAN label='#' labelattrs=(size=9pt) valueattrs=(size=9pt); xaxis label='OVERALL DRAFT PICK'; * x-axis is overall draft pick numbers; x2axis display=(noline noticks nolabel) valueattrs=(size=9pt) values=(&midpoints) valuesdisplay=('' 'ROUND 1' 'ROUND 2' 'ROUND 3' 'ROUND 4' 'ROUND 5' 'ROUND 6' 'ROUND 7' ''); * Show Round headings at top on x2axis; refline &reflines / axis=x; * Show reference lines at beginning of each round; run; ods html5 close; SAMPLE DATA HTML5 Version With Tooltips

tc · ‎04-22-2025

Good catch!

tc · ‎04-20-2025

A quick SAS ODS Graphics take on a cute Easter Cards for Kids project. Happy Easter, all! * Fun w/SAS ODS Graphics: Here Comes Polygons-and-Ellipses Peter Cottontail! Inspired by cute card at iheartcraftythings.com/easter-cards-for-kids.html; data bunny; * Generate polygons for bunny's body and teeth; polygon=1; x=1; y=3; output; x=4; output; y=0; output; x=1; output; x=.; y=.; * Body; polygon+1; xt=2; yt=1; output; xt=2.5; output; yt=.35; output; xt=2; output; * Left tooth; polygon+1; xt=2.5; yt=1; output; xt=3; output; yt=.35; output; xt=2.5; output; * Right tooth; ods graphics / reset height=5in width=5in antialias imagefmt=png; proc template; * Draw bunny (polygon and ellipse plots); define statgraph bunny; begingraph / opaque=true border=false backgroundcolor=cxFDA3AC; * Rose backbround color; layout overlayequated / opaque=true border=false backgroundcolor=cxFDA3AC wallcolor=cxFDA3AC WALLDISPLAY=(FILL) xaxisopts=(display=none offsetmin=0.05 offsetmax=0.05) yaxisopts=(display=none offsetmin=0.05 offsetmax=0.05); entry "HAPPY EASTER!" / textattrs=(size=16pt color=white) valign=top; * Easter greetings; ellipseparm xorigin=2 yorigin=3 semimajor=.45 semiminor=1.75 slope=.15 / fillattrs=(color=cxE5E1D8) display=(fill); * Left outer ear (use slope to tilt); ellipseparm xorigin=2 yorigin=3 semimajor=.25 semiminor=1.25 slope=.15 / fillattrs=(color=cxFEE6E4) display=(fill); * Left inner ear; ellipseparm xorigin=3 yorigin=3 semimajor=.45 semiminor=1.75 slope=-.15 / fillattrs=(color=cxE5E1D8) display=(fill); * Right outer ear; ellipseparm xorigin=3 yorigin=3 semimajor=.25 semiminor=1.25 slope=-.15 / fillattrs=(color=cxFEE6E4) display=(fill); * Right inner ear); polygonplot x=x y=y id=polygon / fillattrs=(color=cxE5E2D9) display=(fill); ellipseparm xorigin=2 yorigin=2 semimajor=.4 semiminor=.4 slope=0 / fillattrs=(color=white) display=(fill); * Left outer eye; ellipseparm xorigin=2 yorigin=1.85 semimajor=.2 semiminor=.2 slope=0 / fillattrs=(color=black) display=(fill); * Left inner eye; ellipseparm xorigin=3 yorigin=2 semimajor=.4 semiminor=.4 slope=0 / fillattrs=(color=white) display=(fill); * Right outer eye; ellipseparm xorigin=3 yorigin=1.85 semimajor=.2 semiminor=.2 slope=0 / fillattrs=(color=black) display=(fill); * Right inner eye; polygonplot x=xt y=yt id=polygon / outlineattrs=(color=black thickness=1pt) fillattrs=(color=white) display=(fill outline); * Teeth; ellipseparm xorigin=2.5 yorigin=1.1 semimajor=.8 semiminor=.4 slope=0 / fillattrs=(color=cxFEE6E6) display=(fill); * Nose; endlayout; endGraph; end; proc sgrender data=bunny template=bunny; * Draw the chart!; run; 1st Draft!

tc · ‎03-03-2025

INPUT (Source: IMDB)

tc · ‎03-01-2025

No time to watch all the nominees? No problem! Clickable images in GitHub-hosted version of SAS ODS Graphics chart will take you to the 2025 Academy Awards Best Picture nominee trailers! https://tedconway.github.io/Misc/oscars2025.html HTML Version of Chart (clickable images link to YouTube trailers) * Fun With SAS ODS Graphics: 2025 Academy Awards Best Picture Nominee Runtimes (Runtimes from IMDB) Inspired by "Here’s How Long It Takes to Watch All the 2025 Best Picture Nominees" https://www.thewrap.com/how-long-2025-oscars-best-picture-nominees-runtimes/; * Grab 2025 Best Picture Oscar nominee data from Excel (Movie, Length, Image Name); proc import file='/home/ted.conway/Oscars2025/Oscars2025.xlsx' dbms=xlsx out=movies replace; data movies2; * Convert hours/minutes to minutes; set movies; minutes=sum(scan(compress(length,'hm'),1,' hm')*60,scan(compress(length,'hm'),2,' hm')); proc sort data=movies2; by minutes; * Display shortest ==> longest films; data images; * Annotate chart with Best Picture nominee images (with clickable URLs to movie trailers) using SAS-provided macros; %SGANNO; * Resize all images to same height, but display at a height that matches their runtime (minutes); %SGIMAGE (image="/home/ted.conway/Oscars2025/ACompleteUnknown.jpg",border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="A Complete Unknown",y1=141,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=FdV-Cs5o8mc'); %SGIMAGE (image="/home/ted.conway/Oscars2025/Anora.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Anora", y1=139,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=8m6UrWMl18M'); %SGIMAGE (image="/home/ted.conway/Oscars2025/Conclave.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Conclave", y1=120,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=JX9jasdi3ic'); %SGIMAGE (image="/home/ted.conway/Oscars2025/DunePartTwo.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Dune: Part Two", y1=166,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=Way9Dexny3w'); %SGIMAGE (image="/home/ted.conway/Oscars2025/EmiliaPerez.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Emilia Pérez", y1=132,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=4h7j_EcZ5fU'); %SGIMAGE (image="/home/ted.conway/Oscars2025/ImStillHere.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="I'm Still Here", y1=137,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=gDunV808Yf4'); %SGIMAGE (image="/home/ted.conway/Oscars2025/NickelBoys.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Nickel Boys", y1=140,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=8HZKgYknVN0'); %SGIMAGE (image="/home/ted.conway/Oscars2025/TheBrutalist.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="The Brutalist", y1=214,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=GdRXPAHIEW4'); %SGIMAGE (image="/home/ted.conway/Oscars2025/TheSubstance.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="The Substance", y1=141,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=LNlrGhBpYjc'); %SGIMAGE (image="/home/ted.conway/Oscars2025/Wicked.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Wicked", y1=160,height=120,heightunit="DATA",anchor="TOP",URL='https://www.youtube.com/watch?v=6COmYeLsz4c'); * Generate chart of films/lengths (Step+Text+Needle plots); ods html5 path='/home/ted.conway/Oscars2025' body='oscars2025.html' options(bitmap_mode="inline"); ods graphics / reset imagemap=on height=6in width=24in imagefmt=png noborder imagename='Oscars2025'; * Use SVG format for clicable web page; proc sgplot data=movies2 sganno=images nowall noborder noautolegend ; styleattrs backcolor=black; inset "2025 Academy Awards Best Picture Nominee Runtimes" "Click Image to View Trailer on YouTube" / textattrs=(color=white size=18pt weight=bold) position=topleft; needle x=movie y=minutes / lineattrs=(thickness=4pt color=white); * Show a drop line from image to baseline ("lollipop" chart); step x=movie y=minutes / justify=center lineattrs=(color=white thickness=2pt); * Step chart of time for each movie; text x=movie y=minutes text=length / strip contributeoffsets=none pad=3 textattrs=(size=12pt color=white weight=bold) position=top; * Display time (hours and minutes); xaxis display=(nolabel noticks noline) valueattrs=(color=white weight=bold size=12pt) offsetmin=.06 offsetmax=.06; * X-axis displays movie names in ascending runtime order; yaxis display=(nolabel noticks noline) valueattrs=(color=white weight=bold size=12pt) values=(0 60 120 180 225) valuesdisplay=('0' '60' '120' '180' ' '); * Y-axis displays runtimes (minutes); refline 0 60 120 180 / axis=y lineattrs=(color=grey) label=""; * Display reference lines for each hour; run; ods html5 close;

tc · ‎03-01-2025

Oscars are Sunday, so here's a SAS ODS Graphics annotated step+text+needle chart of the runtimes of the Best Picture nominees. The Wrap did the math and came up with a total of about 26-and-a-half hours, so there's still time to binge watch 'em all before the show! * Fun With SAS ODS Graphics: 2025 Academy Awards Best Picture Nominee Runtimes (Runtimes from IMDB) Inspired by "Here’s How Long It Takes to Watch All the 2025 Best Picture Nominees" https://www.thewrap.com/how-long-2025-oscars-best-picture-nominees-runtimes/; * Grab 2025 Best Picture Oscar nominee data from Excel (Movie, Length, Image Name); proc import file='/home/ted.conway/Oscars2025/Oscars2025.xlsx' dbms=xlsx out=movies replace; data movies2; * Convert hours/minutes to minutes; set movies; minutes=sum(scan(compress(length,'hm'),1,' hm')*60,scan(compress(length,'hm'),2,' hm')); proc sort data=movies2; by minutes; * Display shortest ==> longest films; data images; * Annotate chart with Best Picture nominee images using SAS-provided macros; %SGANNO; * Resize all images to same height, but display at a height that matches their runtime (minutes); %SGIMAGE (image="/home/ted.conway/Oscars2025/ACompleteUnknown.jpg",border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="A Complete Unknown",y1=141,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/Anora.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Anora", y1=139,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/Conclave.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Conclave", y1=120,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/DunePartTwo.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Dune: Part Two", y1=166,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/EmiliaPerez.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Emilia Pérez", y1=132,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/ImStillHere.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="I'm Still Here", y1=137,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/NickelBoys.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Nickel Boys", y1=140,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/TheBrutalist.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="The Brutalist", y1=214,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/TheSubstance.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="The Substance", y1=141,height=120,heightunit="DATA",anchor="TOP"); %SGIMAGE (image="/home/ted.conway/Oscars2025/Wicked.jpg", border="true",linecolor="white",drawspace="datavalue",imagescale="fitheight",xc1="Wicked", y1=160,height=120,heightunit="DATA",anchor="TOP"); * Generate chart of films/lengths (Step+Text+Needle plots); ods listing image_dpi=300 gpath='/home/ted.conway/Oscars2025'; * Increase resolution to 300 DPI; ods graphics / reset height=6in width=24in imagefmt=png noborder imagename='Oscars2025'; proc sgplot data=movies2 sganno=images nowall noborder noautolegend ; styleattrs backcolor=black; inset "2025 Academy Awards Best Picture Nominee Runtimes" / textattrs=(color=white size=18pt weight=bold) position=topleft; needle x=movie y=minutes / lineattrs=(thickness=4pt color=white); * Show a drop line from image to baseline ("lollipop" chart); step x=movie y=minutes / justify=center lineattrs=(color=white thickness=2pt); * Step chart of time for each movie; text x=movie y=minutes text=length / strip contributeoffsets=none pad=3 textattrs=(size=12pt color=white weight=bold) position=top; * Display time (hours and minutes); xaxis display=(nolabel noticks noline) valueattrs=(color=white weight=bold size=12pt) offsetmin=.06 offsetmax=.06; * X-axis displays movie names in ascending runtime order; yaxis display=(nolabel noticks noline) valueattrs=(color=white weight=bold size=12pt) values=(0 60 120 180 225) valuesdisplay=('0' '60' '120' '180' ' '); * Y-axis displays runtimes (minutes); refline 0 60 120 180 / axis=y lineattrs=(color=grey) label=""; * Display reference lines for each hour; run; 80% Zoom

tc · ‎02-13-2025

Here's a SAS ODS Graphics take on a cute Valentine's Day craft project for kids. Happy Valentine's Day, all! * Fun With SAS ODS Graphics: Bee My Valentine Inspired by Valentine's Day craft projects for kids https://members.easypeasyandfun.com/downloads/heart-bee-card-for-valentines-day https://www.etsy.com/listing/1151483398/valentines-day-bee-heart-craft-kit; data hearts; * Generate parts of the bee; xT=0.05; yT=2.5; text=')'; output; xT=.; yT=.; * Smile (parenthesis rotated 270 degrees); x1=0; y1=2.75; y2=4.25; x2=x1-(y2-y1)/3; output; x2=-x2; output; * Antenna (vector lines); x=x2; y=y2; x1=.; x2=.; y1=.; y2=.; color='YELLOW345'; output; x=-x; color='YELLOW15 '; output; * Tips of antenna (yellow hearts); y=2; x=-1.25; color='YELLOW90 '; output; y=2; x=1.25; color='YELLOW270'; output; * Wings (yellow hearts); y=2; x=-1.15; color='BLACK90 '; output; y=2; x=1.15; color='BLACK270'; output; * Wings (black heart overlays); do y=1.25 to 2.75 by .5; x=0; if color='BLACK ' then color='YELLOW'; else color='BLACK'; output; end; * Body (alternating yellow/black hearts); data myattrmap; * Bee is made up of MS-Word heart icon images in various colors & sizes (in pixels), rotated at different angles; input ID $ value : $15. markersymbol : $15. markersize; datalines; myid YELLOW heartyellow 267 myid YELLOW15 heartyellow15 50 myid YELLOW90 heartyellow90 267 myid YELLOW270 heartyellow270 267 myid YELLOW345 heartyellow345 50 myid BLACK heartblack 267 myid BLACK90 heartblack90 175 myid BLACK270 heartblack270 175 ; * Generate a bee valentine - vector + scatter + ellipse + text plots; ods graphics / reset width=5in height=5in antialias border=off imagefmt=svg; proc sgplot data=hearts noautolegend nowall noborder dattrmap=myattrmap subpixel; * Use discrete attribute map to map objects to their images; inset 'BEE MINE, VALENTINE!' / textattrs=(color=pappk weight=bold size=20pt) position=top; * Chart title; symbolimage name=heartyellow image="/home/ted.conway/HeartYellow.png"; * Yellow MS-Word heart icon tilted at various angles; symbolimage name=heartyellow15 image="/home/ted.conway/HeartYellow.png" / rotate=15; symbolimage name=heartyellow90 image="/home/ted.conway/HeartYellow.png" / rotate=90; symbolimage name=heartyellow270 image="/home/ted.conway/HeartYellow.png" / rotate=270; symbolimage name=heartyellow345 image="/home/ted.conway/HeartYellow.png" / rotate=345; symbolimage name=heartblack image="/home/ted.conway/HeartBlack.png"; * Black MS-Word heart icon tilted at various angles; symbolimage name=heartblack90 image="/home/ted.conway/HeartBlack.png" / rotate=90; symbolimage name=heartblack270 image="/home/ted.conway/HeartBlack.png" / rotate=270; styleattrs backcolor=cxd41f3a; * "Valentine red" background; vector x=x2 y=y2 / noarrowheads xorigin=x1 yorigin=y1 lineattrs=(thickness=5pt color=black); * Antenna lines; scatter x=x y=y / group=color attrid=myid; * Valentine-shaped body and wings; ellipseparm semimajor=.075 semiminor=.075 / xorigin=.25 yorigin=3 nooutline fill fillattrs=(color=black); * Right eye; ellipseparm semimajor=.075 semiminor=.075 / xorigin=-.25 yorigin=3 nooutline fill fillattrs=(color=black); * Left eye; text x=xT y=yT text=text / contributeoffsets=none rotate=270 textattrs=(weight=bold size=48pt) strip; * Mouth (rotated parenthesis); xaxis display=none values=(-2.5 2.5) offsetmin=0.03 offsetmax=.03; * Suppress axes and limit bounds of chart; yaxis display=none values=(0 5) offsetmin=0.03 offsetmax=.03; MS-WORD HEART ICONS USED (RESIZED & ROTATED IN SAS CODE)

tc · ‎02-08-2025

The Kansas City Chiefs' Patrick Mahomes will match up against the Philadelphia Eagles' Jalen Hurts on Sunday in Super Bowl LIX, a rematch of Super Bowl LVII (which KC won). Used a SAS ODS Graphics boxplot to compare the two quarterbacks' performance two years ago, so this time here's a simple scatter plot comparison of the pair's passing yardages and completion percentages for the 2024-2025 regular season games. Go [your team here]! * Fun With SAS ODS Graphics: Super Bowl LIX, Mahomes vs. Hurts II; * Read in NFL.com quarterback data from Excel sheets and merge; proc import file='/home/ted.conway/MahomesHurts2024.xlsx' out=mahomes dbms=xlsx replace; sheet="Mahomes"; proc import file='/home/ted.conway/MahomesHurts2024.xlsx' out=hurts dbms=xlsx replace; sheet="Hurts"; proc sql; * Merge data, compute completion %, filter out games if which they played little/none; create table mahomeshurts as select 'Mahomes' as QB, yds, comp/att as comp_pct from Mahomes where att>=5 union all select 'Hurts' as QB, yds, comp/att as comp_pct from Hurts where att>=5; data myattrmap; * Assign marker images to quarterbacks (MS-Word football icons in team color); input ID $ value $ markersymbol $; datalines; myid Mahomes chiefs myid Hurts eagles ; %SGANNO; * Create file used to annotate chart with NFL.com potos of Mahomes/Hurts using SAS-provided macros; data qbpics; %SGIMAGE (image="/home/ted.conway/mahomes2025.png",drawspace="DATAVALUE",x1=.56,y1space="LAYOUTPERCENT",y1=0,height=12,heightunit="percent",anchor="BOTTOM"); * Mahomes (bottom left); %SGIMAGE (image="/home/ted.conway/hurts2025.png",drawspace="DATAVALUE",x1=.74,y1space="LAYOUTPERCENT",y1=0,height=12,heightunit="percent",anchor="BOTTOM"); * Hurts (bottom right); * Generate a scatter chart of completion % vs yards for each game; ods graphics / reset antialias height=7.5in width=7.5in border=off imagefmt=svg; proc sgplot data=mahomeshurts nowall noborder dattrmap=myattrmap sganno=qbpics subpixel; * Map quarterbacks to their football icons and display their photos; inset 'SUPER BOWL LIX' ' QB MATCHUP' / border textattrs=(color=white weight=bold size=14pt) position=top; * Chart title; symbolimage name=chiefs image="/home/ted.conway/chiefs2.png"; * Kansas City Chiefs team-colored MS-Word football icon; symbolimage name=eagles image="/home/ted.conway/eagles2.png"; * Philadelphia Eagles team-colored MS-Word football icon; styleattrs backcolor=cxbad8bc; * Pastel greenish-background; scatter x=comp_pct y=yds / group=qb markerattrs=(size=24pt) attrid=myid; * Scatter chart of completion percentage X yards X QB; label yds="Passing Yards (Regular Season Games With 5+ Attempts)" comp_pct="Completion Percentage"; * x/y-axis lables; format comp_pct percent5.1; * Format completion percentage; keylegend / title="" noopaque valueattrs=(color=white weight=bold); * Chart legend options; xaxis display=(noticks noline) grid labelattrs=(color=white weight=bold) valueattrs=(color=white weight=bold) labelattrs=(color=white weight=bold); * x-axis options; yaxis display=(noticks noline) grid labelattrs=(color=white weight=bold) valueattrs=(color=white weight=bold) labelattrs=(color=white weight=bold); * y-axis ooptions;

tc · ‎12-29-2024

Here's a Newton's Cradle-inspired animated GIF ball drop to roll out the old year - Happy New Year, all! * Fun With SAS ODS Graphics: New Year's Eve Newton's Cradle Ball Drop Info on Newton's Cradle at en.wikipedia.org/wiki/Newton%27s_cradle; data balls; * Generate x/y points for 4 balls in Newton's Cradle; r=7.45; y0=8; pi=constant("pi"); * End balls swing through 30 degree arcs, middle balls stay contant; do outerframe=0 to 11; * 12 time periods - beginning, 10-to-0 seconds countdown, end ending; if outerframe=11 then do; mtext='HAPPY NEW YEAR!'; mX=0; mY=8.3; end; * 11th frame displays Happy New Year!; ball=1; text='2'; x0=-1.5; * Ball one ('2') swings through 30 degree arc; frame=0; do a=90 to 120 by 6, 120 to 96 by -6; radians=2*pi*a/360; x=x0+r*cos(radians); y=y0-r*sin(radians); angle=-(a-90); * Ball only swings on alternate time periods; if outerframe in (0, 11) or mod(outerframe,2)=0 then do; angle=0; x=x0; y=y0-r; end; frame+1; output; end; * Balls two ('0') and three ('2') are fixed and do not swing; ball=2; text='0'; x=-.5; x0=-.5; y=y0-r; angle=0; do frame=1 to 11; output; end; ball=3; text='2'; x=.5; x0=.5; y=y0-r; angle=0; do frame=1 to 11; output; end; ball=4; text='4'; x0=1.5; frame=0; do a=-270 to -300 by -6, -300 to -276 by 6; * Ball four ('4' or '5') swings through 30 degree arc; radians=2*pi*a/360; x=x0+r*cos(radians); y=y0-r*sin(radians); angle=-(a+270); * Ball only swings on alternate time periods; if outerframe in (0, 11) or ^mod(outerframe,2)=0 then do; angle=0; x=x0; y=y0-r; end; frame+1; output; end; end; proc sql; * No arcs for first/last loops, flip year from 2024 --> 2025 on last swing return; delete from balls where outerframe in (0,11) and frame>1; update balls set text='5' where ball=4 and (outerframe=11 or (outerframe>=10 and frame>=8)); proc sort data=balls; by outerframe frame; * Order to allow BY statement to be used in plots; ods graphics / reset height=8in width=8in noborder; * Create animated GIF from generated images; options nobyline papersize=('8 in', '8 in') animduration=2 animloop=yes printerpath=gif animation=start nodate nonumber; ods printer file='~/nye/nye2025.gif'; * Animated GIF filename; %macro genplots; /* Use macros to produce 12 sets of frames */ %macro genplot(n); /* Each set of frames takes about 1 second (countdown) with pauses before and after */ %if &n=0 %then options animduration=1.5 %str(; run;); /* Opening frame */ %else %if &n=11 %then options animduration=2 %str(; run;); /* Countdown frames */ %else options animduration=.1 %str(; run;); /* Final frame (2025) */ /* Plot the Newton's Cradle (Vector+Ellipse+Text plots) */ proc sgplot data=balls(where=(outerframe=&n)) nowall noautolegend nowall noborder noautolegend; by outerframe frame; /* Use BY statement to create multiple plots for animation */ styleattrs backcolor=black; /* Black background */ vector x=x y=y / noarrowheads xorigin=x0 yorigin=y0 lineattrs=(color=cxa9acb6 thickness=2.5pt); /* Strings */ ellipseparm semimajor=.5 semiminor=.5 / xorigin=x yorigin=y nooutline lineattrs=(color=cxa9acb6) fill fillattrs=(color=cxa9acb6); /* Balls */ text x=x y=y text=text / rotate=angle strip textattrs=(color=black size=36pt weight=bold) contributeoffsets=none; /* Year digits */ refline 8.3 / axis=y lineattrs=(thickness=28pt color=cxa9acb6); /* Newton's cradle bar */ text x=mX y=mY text=mText / strip textattrs=(color=black size=20pt weight=bold) contributeoffsets=none; /* Happy New Year! message */ xaxis display=none values=(-5 5) offsetmin=0 offsetmax=0; /* Suppress axis info, limit bounds */ yaxis display=none values=(-1 9) offsetmin=0 offsetmax=0; /* Suppress axis info, limit bounds */ inset %if &n=0 %then "0:10"; %else %if &n=11 %then "0:00"; %else "0:%sysfunc(putn(%eval(10-&n+1),z2.))"; / position=bottom noborder textattrs=(color=cxa9acb6 size=24pt); /* Countdown timer */ run; %mend; %do n=0 %to 11; %genplot(&n); %end; /* 12 sets of frames */ %mend; %genplots; options printerpath=gif animation=stop; * Stop recording images; ods printer close;

tc · ‎12-22-2024

A SAS ODS Graphics text/scatter plot take on a couple of neat word search-themed architect and designer Xmas cards at dezeen. Happy Holidays, all! * Fun With SAS ODS Graphics - O [Text & Scatter Plot] Xmas Tree A take on a couple of holiday cards at dezeen.com/2022/12/23/christmas-cards-architects-designers-2022/; data letters(keep=r c letter randnum); * Generate random A-Z letters to fill a 13x13 grid; retain a2z 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' letter ' '; do r=1 to 13; do c=1 to 13; randnum=1+floor(rand("Uniform", 26)); letter=substr(a2z,randnum,1); output; end; end; data message(keep=x0 y0 xM yM textM); * Generate x/y points and letters for a "Happy Holidays!" message; retain textM ' '; msg=" HAPPYHOLIDAYS!"; * Holiday message, x/y offset points for where to display letters (leave space at top for star!); msgXY="0,0 -1,-2 1,-2 -2,-4 0,-4 2,-4 -3,-6 -1,-6 1,-6 3,-6 -4,-8 -2,-8 0,-8 2,-8 4,-8"; x0=7; y0=11; * x/y origin of top of "Xmas tree"; do i=1 to length(msg); * Calc x/y locations of message letters; textM=substr(msg,i,1); * Message letter; xM=x0+scan(scan(msgXY,i,' '),1,', '); * x location of message letter (origin+offset); yM=y0+scan(scan(msgXY,i,' '),2,', '); * y location of message letter (origin+offset); output; end; proc sql; * Insert our message into the grid, set color to white for message letters, black for others; create table lettersmessage as select l.r, l.c, case when m.xM is null then 0 else 1 end as color, case when m.xM is not null then m.textM else l.letter end as letter, m.xM, m.yM, m.x0, m.y0 from letters l left join message m on l.r=m.yM and l.c=m.xM; * Display the tree!; ods graphics / reset=all width=6.5in height=6.5in imagefmt=svg noborder; proc sgplot data=lettersmessage noborder nowall noautolegend pad=0 aspect=1; styleattrs backcolor=cx008975; * Nice shade of green from card (hex RGB code obtained using Paintbrush eyedropper); text x=c y=r text=letter / colorresponse=color textattrs=(size=16pt weight=bold) colormodel=(black white); * Display black & white letters; scatter x=x0 y=y0 / markerattrs=(size=11pt color=white symbol=starfilled); * Put a star on top; scatter x=xM y=yM / markerattrs=(symbol=circle size=26pt color=white); * Draw white circles around message letters and star; xaxis display=none values=(0 to 14); yaxis display=none values=(0 to 14); * Suppress axes and set width/height bounds; run;

tc · ‎12-20-2024

Within Divisions Across Divisions With the regular NFL season wrapping up, are you ready for some SAS ODS Graphics football? A bit oversimplified on the rankings (left as an exercise for you NFL tiebreaking procedures experts!) but here's a SAS ODS Graphics 100% Win-Loss-Tie Bar Chart take on the latest intra and inter-divisional NFL Standings using SGPANEL and SGPLOT. * Fun With SAS ODS Graphics: A Bar Chart Look at Intra and Inter-Conference NFL Standings Data source: google.com/search?q=nfl+standings; * Import data from Excel; proc import datafile='/home/ted.conway/NFLstandings20241219.xlsx' dbms=xlsx out=nflstats(rename=(c=TEAM d=W_CHAR e=L_CHAR f=T_CHAR)) replace; getnames=no; * Cleanup and eshape data for charting; data nflstats2chart(keep=TEAM_CONF_DIV CONF_DIV TEAM pct wlt wlt_order games w l t); set nflstats; length CONF_DIV $ 25.; retain CONF_DIV; * Get conference/division from column A and retain it; if a=:'NFC' or a=:'AFC' then CONF_DIV=A; if a=:'NFC' or a=:'AFC' or team in ('','Team') then delete; * Only output rows with standings; TEAM_CONF_DIV=catt(TEAM, ' (', CONF_DIV, ')'); * Create composite column for ranking across conferences/divisions; w=input(w_char,best.); * Convert wins/losses/ties to numeric; l=input(l_char,best.); t=input(t_char,best.); pct=w/(w+l+t); * Calc winning percentage for ranking; wlt='W'; wlt_order=1; games=W; output; * Create 1 row for each type (wins/losses/ties); wlt='L'; wlt_order=2; games=L; output; wlt='T'; wlt_order=3; games=T; output; %SGANNO; * Create annotation dataset with NFL logo, location using SAS macros; data nflimg; * Source: en.wikipedia.org/wiki/File:National_Football_League_logo.svg; %SGIMAGE (image="/home/ted.conway/National_Football_League_logo.svg.png",drawspace="GRAPHPERCENT",x1=94.4,y1=6,height=10,heightunit="PERCENT",anchor="bottomright"); * Rank teams by winning % within divisions; proc sort data=nflstats2chart; by conf_div descending pct team wlt_order; * SGPANEL bar chart of standings within conferences; ods graphics / reset height=7in width=9in noborder imagefmt=svg; proc sgpanel data=nflstats2chart noautolegend pad=(left=.2in right=.2in) pctlevel=group sganno=nflimg; styleattrs datacolors=(green red lightgrey); * Colors for wins/losses/ties; panelby CONF_DIV / headerbackcolor=white columns=1 layout=rowlattice uniscale=column onepanel noheaderborder noborder rowheaderpos=left novarname spacing=3; hbar team / response=games group=WLT barwidth=1 stat=percent dataskin=crisp grouporder=data fill seglabel seglabelattrs=(color=white weight=bold); colaxis values=(0 to 1 by .1) valuesformat=percent6. display=(nolabel noline) refticks=(values) offsetmin=.02; rowaxis discreteorder=data display=(nolabel noticks noline) offsetmin=.15 offsetmax=.15 labelattrs=(weight=bold size=12pt); rowaxistable games / classorder=data position=left valueattrs=(size=8.5pt) pad=0; refline (.1 to 1 by .1) / axis=x label=""; %SGANNO; * Create annotation dataset with NFL logo, location using SAS macros; data nflimg; * Source: en.wikipedia.org/wiki/File:National_Football_League_logo.svg; %SGIMAGE (image="/home/ted.conway/National_Football_League_logo.svg.png",drawspace="GRAPHPERCENT",x1=94.6,y1=7.6,height=10,heightunit="PERCENT",anchor="bottomright"); * Rank teams by winning % across divisions; proc sort data=nflstats2chart; by descending pct team wlt_order; * SGPLOT bar chart of standings across conferences; proc sgplot data=nflstats2chart(drop=pct) noborder noautolegend pad=(left=.2in right=.2in) pctlevel=group sganno=nflimg;; styleattrs datacolors=(green red lightgrey); * Colors for wins/losses/ties; hbar TEAM_CONF_DIV / response=games dataskin=crisp stat=percent group=WLT barwidth=1 grouporder=data seglabel seglabelattrs=(color=white weight=bold); xaxis values=(0 to 1 by .1) valuesformat=percent6. display=(nolabel noline) refticks=(values) offsetmin=.02; yaxis discreteorder=data display=(noline noticks nolabel) labelattrs=(weight=bold size=11pt); refline (.1 to 1 by .1) / axis=x label=""; yaxistable games / classorder=data position=left location=inside valueattrs=(size=8.5pt); run; Sample Input Data

Online Status	Offline
Date Last Visited	3 weeks ago