%I #7 Sep 03 2020 15:19:45
%S 4,1,1,5,3,7,5,2,6,4,1,6
%N First Sunday in n-th month of 365-day year starting on Thursday
%t Select[Flatten[Table[{2015,m,d},{m,12},{d,7}],1],DayName[ #] == Sunday&][[All,3]] (* _Harvey P. Dale_, Sep 03 2020 *)
%K nonn,fini,full
%O 1,1
%A _J. Lowell_, Jan 02 2009
%E Keywords added by _Harvey P. Dale_, Sep 03 2020