OFFSET
1,1
COMMENTS
For a guide to related sequences, see A205558.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
MATHEMATICA
(See the program at A205720.)
Position[With[{prs=Prime[Range[30]]}, Flatten[Table[prs[[n]]-Take[prs, n-1], {n, 2, Length[prs]}]]], _?(Divisible[#, 10]&)]//Flatten (* Harvey P. Dale, Jan 15 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 31 2012
STATUS
approved