1,2

Table of n, a(n) for n=1..105.

f[n_] := Abs[Mod[Prime[n + 1], 10] - Mod[Prime[n], 10]]; Array[f, 105] (*Chandler*)

Sequence in context: A110141 A293443 A247765 * A278234 A068976 A265392

Adjacent sequences: A129747 A129748 A129749 * A129751 A129752 A129753

base,easy,nonn

Giovanni Teofilatto, Jun 02 2007

Corrected and extended by Ray Chandler, Jun 12 2007

approved