OFFSET
1,1
COMMENTS
For numbers n such that (n,n+2,n+6,n+8) forms a quadruplet of consecutive primes ending respectively in 1,3,7,9, see A007530.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
lst = Prime@ Range@ 1828; lst[[Select[Range@ 1828 - 1, Mod[ lst[[ # ]], 10] == 1 && lst[[ # ]] + 8 == lst[[ # + 1]] &]]] (* Robert G. Wilson v *)
Transpose[Select[Partition[Prime[Range[2000]], 2, 1], #[[2]]-#[[1]]==8 && Mod[ #[[1]], 10]==1&]][[1]] (* Harvey P. Dale, Mar 23 2015 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Lekraj Beedassy, Jul 29 2008
EXTENSIONS
Inserted 491, 1571, sorted and extended R. J. Mathar, Aug 04 2008
STATUS
approved