OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
MATHEMATICA
SequencePosition[DivisorSigma[0, Range[2000]], {8, 8}][[All, 1]] (* Harvey P. Dale, Sep 07 2021 *)
PROG
(PARI) is(n)=numdiv(n)==8 && numdiv(n+1)==8
CROSSREFS
KEYWORD
nonn
AUTHOR
Charles R Greathouse IV, Jun 19 2016
STATUS
approved