OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Range[1200], DivisorSigma[0, #] +DivisorSigma[0, # + 2] == DivisorSigma[0, 2*# +2] &] (* G. C. Greubel, Jan 06 2019 *)
CROSSREFS
KEYWORD
nonn,less
AUTHOR
Juri-Stepan Gerasimov, Jul 11 2011
STATUS
approved