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 A035142 #20 Aug 18 2025 18:59:40 %S A035142 0,1,2,6,20,29,46 %N A035142 Numbers k with property that number of partitions-into-distinct-parts of k is a perfect square. %C A035142 Next term, if it exists, is greater than 50000. - _David Wasserman_, Aug 06 2002 %t A035142 okQ[n_] := IntegerQ[Sqrt[PartitionsQ[n]]]; Select[Range[10000], okQ] (* _Harvey P. Dale_, Mar 13 2011 *) %o A035142 (PARI) q(n)= polcoeff(prod(k=1,n,1+x^k,1+x*O(x^n)), n) %o A035142 for(n=0,1000, if(issquare(q(n)),print1(n,","))) %Y A035142 Cf. A000009. %K A035142 nonn %O A035142 1,3 %A A035142 _Olivier Gérard_ %E A035142 Entry revised by _N. J. A. Sloane_, Jul 23 2006