Last Friday of each month: Difference between revisions

+Stata
(→‎{{Header|AppleScript}}: Updated primitives)
(+Stata)
Line 3,374:
12 rows selected.
</pre>
 
=={{header|Stata}}==
<lang stata>program last_fridays
args year
clear
qui set obs 12
gen day=dofm(mofd(mdy(_n,1,`year'))+1)-1
qui replace day=day-mod(dow(day)+2,7)
format %td day
list, noobs noheader sep(6)
end
 
last_fridays 2012
 
+-----------+
| 27jan2012 |
| 24feb2012 |
| 30mar2012 |
| 27apr2012 |
| 25may2012 |
| 29jun2012 |
|-----------|
| 27jul2012 |
| 31aug2012 |
| 28sep2012 |
| 26oct2012 |
| 30nov2012 |
| 28dec2012 |
+-----------+</lang>
 
=={{header|Swift}}==
1,336

edits