login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A288024
Prime p1 of consecutive primes p1, p2, where p2 - p1 = 8, and p1, p2 are in different decades.
4
89, 359, 389, 449, 479, 683, 719, 743, 929, 983, 1109, 1163, 1193, 1373, 1439, 1523, 1559, 1733, 1823, 1979, 2003, 2153, 2213, 2243, 2273, 2459, 2609, 2663, 2699, 2843, 2879, 2909, 3209, 3449, 3623, 3719, 4289, 4349, 4583, 4943, 5189, 5399, 5573, 5693, 5783, 5813
OFFSET
1,1
COMMENTS
The unit digits of the numbers in the sequence are 3's or 9's.
LINKS
EXAMPLE
89 is in the sequence since pair (89,97) is the first with difference 8 spanning a multiple of 10.
MATHEMATICA
a288024[n_] := Map[Last, Select[Map[{NextPrime[#, 1], NextPrime[#, -1]}&, Range[10, n, 10]], First[#]-Last[#]==8&]]
a288024[6000] (* data *)
Select[Partition[Prime[Range[800]], 2, 1], #[[2]]-#[[1]]==8&&IntegerDigits[#[[1]]][[-2]]!= IntegerDigits[ #[[2]]][[-2]]&][[;; , 1]] (* Harvey P. Dale, Jan 09 2024 *)
KEYWORD
nonn
AUTHOR
Hartmut F. W. Hoft, Jun 04 2017
STATUS
approved