login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A243002 a(n) = date of Easter in April of n, in the Gregorian calendar after A.D. 1582. a(n) = 0 if Easter occurs in March. 1
10, 1, 21, 6, 0, 17, 2, 22, 14, 0, 18, 10, 0, 14, 6, 0, 11, 2, 22, 7, 0, 18, 10, 0, 15, 6, 19, 11, 3, 22, 7, 0, 19, 3, 0, 15, 0, 19, 11, 0, 16, 7, 0, 12, 4, 23, 15, 0, 20, 11, 0, 16, 8, 0, 12, 4, 24, 8, 0, 20, 5, 0, 16, 1, 21, 12, 4, 17, 9, 0, 13, 5, 0, 16, 1, 21 (list; graph; refs; listen; history; text; internal format)
OFFSET

1583,1

LINKS

Table of n, a(n) for n=1583..1658.

Wikipedia, Easter

Index entries for sequences related to calendars

MATHEMATICA

If[#[[2]]==3, 0, #[[3]]]&/@(DataPaclets`CalendarDataDump`EasterSunday/@Range[1583, 1683]) (* The program uses the DataPaclets and CalendarDataDump functions from Mathematica version 10 *) (* Harvey P. Dale, Apr 01 2015 *)

PROG

(PARI) for(y=1583, 1658, a=lift(Mod(y, 19)); b=floor(y/100); c=lift(Mod(y, 100)); d=floor(b/4); e=lift(Mod(b, 4)); f=floor((b+8)/25); g=floor((b-f+1)/3); h=lift(Mod(19*a+b-d-g+15, 30)); i=floor(c/4); k=lift(Mod(c, 4)); l=lift(Mod(32+2*e+2*i-h-k, 7)); m=floor((a+11*h+22*l)/451); p=lift(Mod(h+l-7*m+114, 31)); if(floor((h+l-7*m+114)/31)==4, print1(p+1, ", "), print1(0, ", ")));

CROSSREFS

Cf. A243001.

Sequence in context: A292690 A036188 A013617 * A050999 A223450 A221311

Adjacent sequences:  A242999 A243000 A243001 * A243003 A243004 A243005

KEYWORD

nonn,easy

AUTHOR

Arkadiusz Wesolowski, Aug 16 2014

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 26 09:03 EDT 2019. Contains 322472 sequences. (Running on oeis4.)