login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A326392
Lesser of twin primes p for which sigma(p+1)/sigma(p) reaches record value, where sigma(n) is the divisor sum function (A000203).
1
3, 5, 11, 29, 59, 179, 239, 419, 1319, 3119, 3359, 7559, 21839, 35279, 42839, 55439, 110879, 415799, 1713599, 1867319, 1912679, 1940399, 2489759, 3991679, 6652799, 6846839, 11531519, 28828799, 85765679, 232792559, 845404559, 1470268799, 6285399119, 6299092799
OFFSET
1,1
COMMENTS
Garcia et al. proved that assuming Dickson's conjecture, {sigma(p+1)/sigma(p) : p and p+2 are prime} is dense in [2, oo), and thus this sequence is infinite.
LINKS
EXAMPLE
The values of sigma(p+1)/sigma(p) for the first terms are 1.75 < 2 < 2.333 < 2.4 < 2.8 < ...
MATHEMATICA
s = {}; rm = 0; p = 2; Do[q = NextPrime[p]; If[q - p != 2, p = q; Continue[]]; r = DivisorSigma[1, p + 1]/DivisorSigma[1, p]; If[r > rm, rm = r; AppendTo[s, p]]; p = q, {10^3}]; s
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Sep 11 2019
STATUS
approved