OFFSET
1,1
COMMENTS
a(n) < a(n-1) for n: 31,43,54,83,98,100,116,122,140,142,155,163,169,173,178,..., . - Robert G. Wilson v, Apr 27 2006
FORMULA
MATHEMATICA
f[n_] := Block[{m = Prime[n + 1] - Prime[n]}, k = Mod[m, Prime[n + 1]]; While[k < Prime[n + 1], k += m]; k]; Array[f, 58] (* Robert G. Wilson v, Apr 27 2006 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Apr 25 2006
EXTENSIONS
More terms from Robert G. Wilson v, Apr 27 2006
STATUS
approved