OFFSET
1,2
COMMENTS
a(47) > 10^9 if it exists. - Michel Marcus, Sep 01 2019
EXAMPLE
n=9: GCD[sigma[x+1], sigma[x]]=5 holds for {391,799,800,881,...} of which the first is a(9)=391.
MATHEMATICA
f[x_] := GCD[DivisorSigma[1, x], DivisorSigma[1, x+1]] t=Table[0, {256}]; Do[s=f[n]; If[s<257&&t[[s]]==0, t[[s]]=n], {n, 1, 10000000}]; t
PROG
(PARI) a(n) = my(x=1, sx=sigma(x), y=2, sy=sigma(2)); while(gcd(sx, sy) != n, x++; y++; sx=sy; sy=sigma(y)); x; \\ Michel Marcus, Aug 28 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jun 13 2003
EXTENSIONS
a(41) from Rémy Sigrist, Aug 29 2019
a(42)-a(46) from Michel Marcus, Aug 30 2019
a(47) from Giovanni Resta, Oct 29 2019
STATUS
approved