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 A332387 #10 Feb 11 2020 04:21:41 %S A332387 13448,27848,75774,135400,243338,276123,396950,452823,497575,524823, %T A332387 565674,587575,632224,639848,719223,769316,861123,935799,1060904, %U A332387 1073875,1153023,1204312,1308856,1366624,1413498,1490599,1555975,1565223,1601798,1767424,1902774,1923295 %N A332387 Numbers k such that k, k + 1 and k + 2 have the same number of divisors in Eisenstein integers. %H A332387 Amiram Eldar, <a href="/A332387/b332387.txt">Table of n, a(n) for n = 1..10000</a> %e A332387 13448 is a term since 13448, 13449 and 13450 each have 12 divisors in Eisenstein integers. %t A332387 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]; Flatten[Position[Partition[ eisNumDiv /@ Range[10^6], 3, 1], {x_, x_, x_}]] (* after _Harvey P. Dale_ at A005238 *) %Y A332387 Cf. A005238, A319442, A332313, A332386, A332388. %K A332387 nonn %O A332387 1,1 %A A332387 _Amiram Eldar_, Feb 10 2020