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 A054004 #33 Oct 27 2023 22:00:45
%S A054004 14,1334,1634,2685,33998,42818,64665,84134,109214,122073,166934,
%T A054004 289454,383594,440013,544334,605985,649154,655005,792855,1642154,
%U A054004 2284814,2305557,2913105,3571905,3682622,4701537,5181045,6431732
%N A054004 Numbers k such that k and k+1 have the same number and sum of divisors.
%H A054004 Amiram Eldar, <a href="/A054004/b054004.txt">Table of n, a(n) for n = 1..1831</a> (calculated using the b-file at A002961; terms 1..967 from T. D. Noe)
%e A054004 Divisors of 14 = {1, 2, 7, 14}, divisors of 15 = {1, 3, 5, 15}, both have four divisors and sum = 24.
%t A054004 Select[Range[100000], DivisorSigma[0, #] == DivisorSigma[0, # + 1] && DivisorSigma[1, #] == DivisorSigma[1, # + 1] &] (* _Jayanta Basu_, Mar 20 2013 *)
%Y A054004 Cf. A000005, A000203, A002961, A005237, A053249, A054005, A054006, A054007.
%K A054004 nonn
%O A054004 1,1
%A A054004 _Asher Auel_, Jan 12 2000
%E A054004 More terms from _Jud McCranie_, Jun 02 2000