OFFSET
2,2
LINKS
Clark Kimberling, Table of n, a(n) for n = 2..1000
EXAMPLE
Write x#y if x|y is false; then 7#17, 6#16, 5#14, 4#12, so a(8) = 4.
MATHEMATICA
Table[m = 1; While[! Divisible[Prime[n]-Prime[m], n-m], m++]; m, {n, 2, 100}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jul 29 2012
STATUS
approved