This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A288024 #14 Jan 09 2024 12:31:08
%S A288024 89,359,389,449,479,683,719,743,929,983,1109,1163,1193,1373,1439,1523,
%T A288024 1559,1733,1823,1979,2003,2153,2213,2243,2273,2459,2609,2663,2699,
%U A288024 2843,2879,2909,3209,3449,3623,3719,4289,4349,4583,4943,5189,5399,5573,5693,5783,5813
%N A288024 Prime p1 of consecutive primes p1, p2, where p2 - p1 = 8, and p1, p2 are in different decades.
%C A288024 The unit digits of the numbers in the sequence are 3's or 9's.
%H A288024 Harvey P. Dale, <a href="/A288024/b288024.txt">Table of n, a(n) for n = 1..1000</a>
%e A288024 89 is in the sequence since pair (89,97) is the first with difference 8 spanning a multiple of 10.
%t A288024 a288024[n_] := Map[Last, Select[Map[{NextPrime[#, 1], NextPrime[#, -1]}&, Range[10, n, 10]], First[#]-Last[#]==8&]]
%t A288024 a288024[6000] (* data *)
%t A288024 Select[Partition[Prime[Range[800]],2,1],#[[2]]-#[[1]]==8&&IntegerDigits[#[[1]]][[-2]]!= IntegerDigits[ #[[2]]][[-2]]&][[;;,1]] (* _Harvey P. Dale_, Jan 09 2024 *)
%Y A288024 Cf. A001359, A023201, A023203, A031924, A031925, A031928, A046117, A046132, A158277, A158861, A160370, A160440, A160500, A287049, A287050, A060229, A288021, A288022.
%K A288024 nonn
%O A288024 1,1
%A A288024 _Hartmut F. W. Hoft_, Jun 04 2017