login
A144189
Table in which row n lists the digits of n, the digits of the number of days in each month of year n and the digits of the number of days in year n.
1
1, 3, 1, 2, 8, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 6, 5, 2, 3, 1, 2, 8, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 6, 5, 3, 3, 1, 2, 8, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 6, 5, 4, 3, 1, 2, 9, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 1, 3, 0, 3, 1, 3
OFFSET
1,2
COMMENTS
Old name was: (1(31+28(february)+31+30+31+30+31+31+30+31+30+31=365), 2(31+28(february)+31+..) becomes (1, 3, 1, 2, 8, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 6, 5, 2, 3, 1, 2, 8, 3, 1,..).
EXAMPLE
Array begins:
1,3,1,2,8,3,1,3,0,3,1,3,0,3,1,3,1,3,0,3,1,3,0,3,1,3,6,5;
2,3,1,2,8,3,1,3,0,3,1,3,0,3,1,3,1,3,0,3,1,3,0,3,1,3,6,5;
3,3,1,2,8,3,1,3,0,3,1,3,0,3,1,3,1,3,0,3,1,3,0,3,1,3,6,5;
4,3,1,2,9,3,1,3,0,3,1,3,0,3,1,3,1,3,0,3,1,3,0,3,1,3,6,6;
...
PROG
(PARI) row(n) = { my(res = digits(n)); if(n % 400 == 0 || (n % 100 != 0 && n % 4 == 0), res = concat(res, [3, 1, 2, 9, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 6, 6]), res = concat(res, [3, 1, 2, 8, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 1, 3, 0, 3, 1, 3, 0, 3, 1, 3, 6, 5]) ); res } \\ Jianing Song, Oct 25 2022, after David A. Corneth's program for A144179
CROSSREFS
Cf. A144179.
Sequence in context: A322469 A052914 A332491 * A131671 A060750 A204025
KEYWORD
nonn,tabf,base,less
AUTHOR
EXTENSIONS
a(3) = 1 inserted according to Name by Michael De Vlieger, Oct 25 2022
New name from and edited by Jianing Song, Oct 25 2022
STATUS
approved