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 A171666 #9 Nov 15 2021 18:56:25
%S A171666 230,242,243,374,603,663,902,1105,1274,1309,1334,1832,1885,1924,2013,
%T A171666 2054,2133,2264,2343,2504,2523,2665,2696,2936,3110,3655,3656,3729,
%U A171666 4203,4401,4503,4504,4614,4669,4695,4807,4923,5133,5862,5943,5944,6054,6061
%N A171666 Numbers n such that n, n+1 and n+2 have the same number of divisors, and that number of divisors is larger than 4.
%H A171666 Harvey P. Dale, <a href="/A171666/b171666.txt">Table of n, a(n) for n = 1..1000</a>
%t A171666 f[n_]:=Length[Divisors[n]]; lst={};Do[If[f[n]==f[n+1]==f[n+2]&&f[n]>4,AppendTo[lst,n]],{n,8!}];lst
%t A171666 Flatten[Position[Partition[DivisorSigma[0,Range[7000]],3,1],_?(Length[ Union[#]]==1&&#[[1]]>4&),{1},Heads->False]] (* _Harvey P. Dale_, Jul 20 2014 *)
%t A171666 SequencePosition[Table[If[DivisorSigma[0,n]>4,DivisorSigma[0,n],n],{n,6100}],{x_,x_,x_}][[All,1]] (* _Harvey P. Dale_, Nov 15 2021 *)
%Y A171666 Cf. A005237, A005238, A171665
%K A171666 nonn
%O A171666 1,1
%A A171666 _Vladimir Joseph Stephan Orlovsky_, Dec 14 2009