OFFSET
1,1
COMMENTS
Odd terms: 63, 99, 105, 117, 153, 171, 189, ..., .
Indices n where A187202(n) =0 are 10, 171, 1947, 2619, 265105, ...- R. J. Mathar, May 06 2016
LINKS
R. J. Mathar, Table of n, a(n) for n = 1..5000
MATHEMATICA
f[n_] := Block[{d = Divisors@ n}, Differences[d, Length@ d - 1][[1]]]; Select[ Range@ 215, f@# < 1&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Apr 28 2016
EXTENSIONS
Edited by N. J. A. Sloane, May 01 2016
STATUS
approved