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 A074044 #8 Apr 06 2025 08:46:02
%S A074044 1,2,3,4,5,6,7,8,9,5,11,12,13,7,15,16,17,18,19,5,7,11,23,24,25,13,27,
%T A074044 7,29,30,31,32,11,17,35,36,37,19,13,8,41,7,43,11,45,23,47,48,49,25,17,
%U A074044 13,53,54,11,8,19,29,59,60,61,31,9,64,13,11,67,17,23,35,71,72
%N A074044 Largest divisor of n having no prime gaps.
%H A074044 Amiram Eldar, <a href="/A074044/b074044.txt">Table of n, a(n) for n = 1..10000</a>
%t A074044 nogapsQ[n_] := Module[{p = FactorInteger[n][[;;, 1]]}, PrimePi[p[[-1]]] == PrimePi[p[[1]]] + Length[p] - 1]; a[n_] := SelectFirst[Reverse[Divisors[n]], nogapsQ]; Array[a, 100] (* _Amiram Eldar_, Apr 06 2025 *)
%Y A074044 Cf. A072941, A073490, A073491.
%K A074044 nonn
%O A074044 1,2
%A A074044 _Reinhard Zumkeller_, Aug 13 2002