OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[600], DivisorSigma[1, #]+12==DivisorSigma[1, #+12]&] (* Harvey P. Dale, Oct 14 2012 *)
PROG
(PARI) is(n)=sigma(n)+12==sigma(n+12) \\ Charles R Greathouse IV, Mar 09 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved