This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A286564 #15 Jun 10 2025 12:37:27 %S A286564 1,1,1,1,0,1,1,0,2,1,1,0,0,0,1,1,0,0,1,1,1,1,0,0,0,0,0,1,1,0,0,0,1,0, %T A286564 3,1,1,0,0,0,0,0,2,0,1,1,0,0,0,0,1,0,0,1,1,1,0,0,0,0,0,0,0,0,0,1,1,0, %U A286564 0,0,0,0,1,0,1,1,2,1,1,0,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,0,0,0,1,0,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,1,0,1,0,1 %N A286564 Triangular table A286563 reversed. %C A286564 See A286563. %H A286564 Antti Karttunen, <a href="/A286564/b286564.txt">Table of n, a(n) for n = 1..7875; the first 125 rows of the triangle</a> %e A286564 The first fifteen rows of this triangular table: %e A286564 1, %e A286564 1, 1, %e A286564 1, 0, 1, %e A286564 1, 0, 2, 1, %e A286564 1, 0, 0, 0, 1, %e A286564 1, 0, 0, 1, 1, 1, %e A286564 1, 0, 0, 0, 0, 0, 1, %e A286564 1, 0, 0, 0, 1, 0, 3, 1, %e A286564 1, 0, 0, 0, 0, 0, 2, 0, 1, %e A286564 1, 0, 0, 0, 0, 1, 0, 0, 1, 1, %e A286564 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, %e A286564 1, 0, 0, 0, 0, 0, 1, 0, 1, 1, 2, 1, %e A286564 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, %e A286564 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, %e A286564 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1 %t A286564 Table[If[k == 1, 1, IntegerExponent[n, k]], {n, 15}, {k, n, 1, -1}] // Flatten (* _Michael De Vlieger_, May 20 2017 *) %o A286564 (Scheme) (define (A286564 n) (A286561bi (A002024 n) (A004736 n))) ;; For A286561bi see A286561. %o A286564 (Python) %o A286564 def T(n, k): %o A286564 i=1 %o A286564 if k==1: return 1 %o A286564 while n%(k**i)==0: %o A286564 i+=1 %o A286564 return i-1 %o A286564 for n in range(1, 21): print([T(n, k) for k in range(1, n + 1)] [::-1]) # _Indranil Ghosh_, May 20 2017 %Y A286564 Cf. A286561, A286563. %Y A286564 Cf. A169594 (row sums). %K A286564 nonn,tabl %O A286564 1,9 %A A286564 _Antti Karttunen_, May 20 2017