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 A102334 #12 Feb 18 2025 04:04:08
%S A102334 272863,274123,372613,1394893,1634293,2380423,3846373,5298523,5358013,
%T A102334 5797903,6741913,7554823,7647643,7716103,7738153,8241463,8358283,
%U A102334 9710473,9859783,12454333,12510193,12796423,13710133,14477893,15162493,15186583,15263503,15603853,16438243,16771933,17913283,18957973,19373623
%N A102334 Initial terms of quintuplets of consecutive primes as follows: {p, p+16, p+24, p+40, p+48}. The corresponding difference-pattern is {16,8,16,8}.
%C A102334 A generalization of A022007.
%H A102334 Amiram Eldar, <a href="/A102334/b102334.txt">Table of n, a(n) for n = 1..10000</a>
%F A102334 a(n) == 13 (mod 30). - _Amiram Eldar_, Feb 18 2025
%t A102334 Select[Partition[Prime[Range[1233300]], 5, 1], Differences[#] == {16, 8, 16, 8} &][[;;, 1]] (* _Amiram Eldar_, Feb 18 2025 *)
%o A102334 (PARI) list(lim) = {my(p1 = 2, p2 = 3, p3 = 5, p4 = 7); forprime(p5 = 11, lim, if(p2 - p1 == 16 && p3 - p2 == 8 && p4 - p3 == 16 && p5 - p4 == 8, print1(p1, ", ")); p1 = p2; p2 = p3; p3 = p4; p4 = p5);} \\ _Amiram Eldar_, Feb 18 2025
%Y A102334 Cf. A001223, A022007, A052162, A052163, A052164, A052165, A052166, A052167, A052168, A052378, A067140, A067141, A102332, A102333.
%K A102334 nonn
%O A102334 1,1
%A A102334 _Labos Elemer_, Jan 06 2005
%E A102334 Missing terms a(1)-a(11) inserted by _Amiram Eldar_, Feb 18 2025