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 A309278 #13 Jun 30 2025 04:21:53
%S A309278 0,1,2,12,24,120,180,360,720,1260,2880,3780,2520,9240,5040,10080,
%T A309278 18480,15120,27720,30240,50400,55440,65520,83160,151200,110880,240240,
%U A309278 166320,221760,277200,388080,332640,360360,554400,665280,786240,997920,831600,942480,720720,1995840
%N A309278 Index of first occurrence of n in the Erdös-Hooley Delta function A226898, with a(0)=0.
%t A309278 f[n_] := Block[{ds = Divisors@n, k = 1, mx = 0}, len = Length@ds; While[k < len, a = Length@Select[Take[ds, {k, len}], ds[[k]]*E > # &]; If[a > mx, mx = a]; k++]; mx]; f[1] = 1; t[_] := 0; k = 1; While[k < 10^5, a = f@k; If[ t[a] == 0, t[a] = k]; k++]; t@# & /@ Range[0, 23]
%Y A309278 Cf. A226898, A226899, A226900, A226901.
%K A309278 nonn
%O A309278 0,3
%A A309278 _Robert G. Wilson v_, Jul 20 2019