|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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,..).
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn,tabf,base,less
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|