OFFSET
1,1
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..10000
EXAMPLE
prime(6) + 1 = 14 has divisors 1,2,7,14, so that k=4 and d(k+1-i) - d(i) ranges through {--13,-5,5,13}, so that a(6) = 5.
MATHEMATICA
f[n_] := f[n] = Prime[n]+1;
Table[Divisors[f[n]] - Reverse[Divisors[f[n]]], {n, 1, 10}]
Table[Min[Abs[Divisors[f[n]] - Reverse[Divisors[f[n]]]]], {n, 1, 100}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Apr 11 2017
STATUS
approved