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 A051005 #21 Feb 16 2025 08:32:41 %S A051005 2,2,3,5,89,29927,444793,602644050950309,5907806880101973271193081, %T A051005 442874899733097781915111718440153 %N A051005 PartitionsQ[ A035359 ], i.e., prime values of PartitionsQ. %C A051005 The next term is known (see A035359) but is too big to include here. %H A051005 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PartitionFunctionQCongruences.html">Partition Function Q Congruences.</a> %H A051005 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PartitionFunctionQ.html">Partition Function Q</a> %t A051005 Reap[For[n = 1, n <= 2500, n++, If[PrimeQ[q = PartitionsQ[n]], Print["n = ", n, " Q = ", q]; Sow[q]]]][[2, 1]] (* _Jean-François Alcover_, Oct 19 2012 *) %t A051005 Select[PartitionsQ[Range[2500]],PrimeQ] (* _Harvey P. Dale_, Aug 11 2015 *) %Y A051005 Cf. A000009, A035359. %K A051005 nonn,nice %O A051005 1,1 %A A051005 _Eric W. Weisstein_