# Greetings from The On-Line Encyclopedia of Integer Sequences! https://backiee.wasmer.app/https_oeis_org/ Search: id:a144189 Showing 1-1 of 1 %I A144189 #19 Oct 27 2022 10:19:54 %S A144189 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, %T A144189 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, %U A144189 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 %N 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. %C A144189 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,..). %e A144189 Array begins: %e A144189 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; %e A144189 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; %e A144189 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; %e A144189 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; %e A144189 ... %o A144189 (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 %Y A144189 Cf. A144179. %K A144189 nonn,tabf,base,less %O A144189 1,2 %A A144189 _Juri-Stepan Gerasimov_, Nov 20 2008 %E A144189 a(3) = 1 inserted according to Name by _Michael De Vlieger_, Oct 25 2022 %E A144189 New name from and edited by _Jianing Song_, Oct 25 2022 # Content is available under The OEIS End-User License Agreement: https://backiee.wasmer.app/https_oeis_org/LICENSE