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 A294086 #19 Feb 16 2025 08:33:51
%S A294086 1,3,6,8,10,281,382,590,5135,13897,31387,37045,46199,85057
%N A294086 Numbers k such that k divides the number of planar partitions of k (A000219).
%C A294086 a(15) > 10^5. - _Seiichi Manyama_, Feb 11 2018
%C A294086 Next term, if it exists, is greater than 250000. - _Vaclav Kotesovec_, Mar 02 2018
%H A294086 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PlanePartition.html">Plane Partition</a>
%e A294086 281 is in the sequence because A000219(281) = 126261896396707768167577329446424334 is divisible by 281.
%t A294086 pp[0] = 1; pp[n_] := pp[n] = (1/n)*Sum[pp[n-k]*DivisorSigma[2, k], {k, 1, n}]; Reap[For[n = 0; k = 1, k < 10^5, k++, If[Divisible[pp[k], k], n++; Print["a(", n, ") = ", k, " pp(", k, ") = ", pp[k]]; Sow[k]]]][[2, 1]] (* _Jean-François Alcover_, Feb 11 2018 *)
%Y A294086 Cf. A000219, A051177, A056848.
%K A294086 nonn,more
%O A294086 1,2
%A A294086 _Ilya Gutkovskiy_, Feb 09 2018
%E A294086 a(14) from _Seiichi Manyama_, Feb 11 2018