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 A375974 #5 Sep 16 2024 12:52:57
%S A375974 113,139,181,211,293,337,421,631,811,839,863,887,953,1021,1051,1069,
%T A375974 1129,1259,1307,1327,1409,1471,1583,1637,1669,1759,1951,2069,2113,
%U A375974 2179,2221,2251,2311,2423,2647,2777,2819,2939,2971,3137,3229,3271,3517,3659,3739,3779
%N A375974 Primes p_1 where products m of k = 4 consecutive primes p_1..p_k are such that only p_1 < m^(1/k).
%C A375974 Let gap g(j) = p_j - p_(j+1), j < k. Primes p_1 such that g(1) is at least as large as g(2) + g(3).
%C A375974 Proper subset of A372209.
%C A375974 Does not intersect A007530.
%H A375974 Michael De Vlieger, <a href="/A375974/b375974.txt">Table of n, a(n) for n = 1..10000</a>
%t A375974 k = 4; s = {1}~Join~Prime[Range[k - 1]]; Reap[Do[s = Append[Rest[s], Prime[i + k - 1]]; r = Surd[Times @@ s, k]; If[Count[s, _?(# < r &)] == 1, Sow[Prime[i]] ], {i, 4000}] ][[-1, 1]]
%Y A375974 Cf. A007530, A372209.
%K A375974 nonn
%O A375974 1,1
%A A375974 _Michael De Vlieger_, Sep 12 2024