OFFSET
1,2
COMMENTS
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..33 (terms < 10^13)
EXAMPLE
Number 22 is in sequence because sigma(22+2) - sigma(22) = 60 - 36 = 24 = 22 + 2.
MATHEMATICA
Select[Range[6*10^6], DivisorSigma[1, # + 2] - DivisorSigma[1, #] == # + 2 &] (* Jake L Lande, Jun 30 2024 *)
PROG
(Magma) [n:n in[1..10^7] | SumOfDivisors(n+2)-SumOfDivisors(n) eq n+2]
(PARI)
for(n=1, 10^7, if(sigma(n+2)-sigma(n)==n+2, print1(n, ", "))) \\ Derek Orr, Sep 05 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Sep 05 2014
EXTENSIONS
a(9)-a(14) from Hiroaki Yamanouchi, Sep 10 2014
a(15)-a(23) from Giovanni Resta, Jul 13 2015
STATUS
approved