A288024 Prime p1 of consecutive primes p1, p2, where p2 - p1 = 8, and p1, p2 are in different decades.

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

Harvey P. Dale, Table of n, a(n) for n = 1..1000

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 *)

Crossrefs

Cf. A001359, A023201, A023203, A031924, A031925, A031928, A046117, A046132, A158277, A158861, A160370, A160440, A160500, A287049, A287050, A060229, A288021, A288022.

Sequence in context: A142292 A031926 A132253 * A118922 A022464 A143828

Adjacent sequences: A288021 A288022 A288023 * A288025 A288026 A288027

Keyword

nonn

Author

Hartmut F. W. Hoft, Jun 04 2017

Status

approved