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 A085499 #19 Apr 16 2025 04:36:37
%S A085499 3,5,7,17,19,31,53,103,127,271,367,463,499,859,967,1013,1483,1951,
%T A085499 3229,3533,3769,3833,4373,5477,6101,7069,7457,8191,8501,9041,9521,
%U A085499 11527,11621,11777,13121,14551,17791,20071,21943,23167,25471,29311,33619,36979,44491,45667
%N A085499 Primes p having exactly one partition into distinct divisors of p+1.
%H A085499 Amiram Eldar, <a href="/A085499/b085499.txt">Table of n, a(n) for n = 1..68</a>
%F A085499 A085496(a(n)) = 1.
%t A085499 seqQ[p_] := Module[{d = Most[Divisors[p+1]]}, SeriesCoefficient[Series[Product[1 + x^d[[i]], {i, Length[d]}], {x, 0, p}], p] == 1]; Select[Range[1000], PrimeQ[#] && seqQ[#] &] (* _Amiram Eldar_, Jan 13 2020 *)
%Y A085499 Subsequence of A085498 and of A085494.
%Y A085499 Cf. A085496.
%K A085499 nonn
%O A085499 1,1
%A A085499 _Reinhard Zumkeller_, Jul 03 2003
%E A085499 a(14)-a(38) from _Alois P. Heinz_, Apr 30 2012
%E A085499 a(39)-a(46) from _Amiram Eldar_, Jan 13 2020