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 A332388 #4 Feb 10 2020 18:23:40
%S A332388 34193750,76788050,78267398,113004199,135383873,148843670,170293249,
%T A332388 199259222,311313398,318128599,364828550,368222599,381026822,
%U A332388 384839047,420686749,428129222,430154150,432466824,450050450,462825847,492828521,510703975,517126773,518268772
%N A332388 Numbers k such that k, k + 1, k + 2 and k + 3 have the same number of divisors in Eisenstein integers.
%e A332388 34193750 is a term since 34193750, 34193751, 34193752 and 34193750 each have 24 divisors in Eisenstein integers.
%t A332388 f[p_, e_] := Switch[Mod[p, 3], 0, 2*e + 1, 1, (e + 1)^2, 2, e + 1]; eisNumDiv[1] = 1; eisNumDiv[n_] := Times @@ f @@@ FactorInteger[n]; m = 4; s = eisNumDiv /@ Range[m]; seq = {}; n = m + 1; While[Length[seq] < 10, If[Length @ Union[s] == 1, AppendTo[seq, n - m + 1]]; n++; s = Join[Rest[s], {eisNumDiv[n]}]]; seq
%Y A332388 Cf. A006601, A319442, A332314, A332386, A332387.
%K A332388 nonn
%O A332388 1,1
%A A332388 _Amiram Eldar_, Feb 10 2020