OFFSET
1,1
COMMENTS
Different from A023203. Below 1000000 the only composite number here is 195556: sigma(195556) + 10 = 342230 + 10 = sigma(195566). - Labos Elemer, May 23 2000
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[2000], DivisorSigma[1, #] + 10==DivisorSigma[1, # + 10] &] (* Vincenzo Librandi, Mar 10 2014 *)
Select[Partition[DivisorSigma[1, Range[1100]], 11, 1], #[[1]]+10==#[[-1]]&][[All, 1]]-1 (* Harvey P. Dale, May 20 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved