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 A054006 #19 Oct 27 2023 22:00:45 %S A054006 4,8,8,8,8,8,16,16,16,8,16,16,16,16,16,16,16,16,32,16,16,16,16,32,16, %T A054006 16,16,24,16,16,16,32,32,32,16,16,32,16,32,16,16,32,32,16,32,16,16,16, %U A054006 16,16,32,32,16,32,16,16,64,32,16,32,16,32,16,64,32,32,16,32,32,32,32 %N A054006 Number of divisors of k and k+1 which have the same number and sum of divisors. %H A054006 Amiram Eldar, <a href="/A054006/b054006.txt">Table of n, a(n) for n = 1..1831</a> (calculated using the b-file at A054004) %F A054006 a(n) = tau(A054004(n)). %e A054006 See example in A054004. %t A054006 Select[Partition[Array[DivisorSigma[{0, 1}, #] &, 10^6], 2, 1], SameQ @@ # &][[All, 1, 1]] (* _Michael De Vlieger_, Nov 21 2019 *) %Y A054006 Cf. A000005, A000203, A002961, A005237, A053249, A054004, A054005, A054007. %K A054006 nonn %O A054006 1,1 %A A054006 _Asher Auel_, Jan 12 2000 %E A054006 More terms from _Jud McCranie_, Oct 15 2000