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 A084049 #13 Apr 13 2024 15:05:54
%S A084049 14,49,104,118,122,213,245,296,356,424,425,459,526,537,715,878,922,
%T A084049 969,1003,1065,1085,1138,1202,1275,1334,1335,1431,1445,1581,1605,1614,
%U A084049 1625,1642,1886,1941,2055,2247,2264,2295,2421,2566,2585,2769,2870,2914,3054
%N A084049 Numbers k such that k and k+1 have the same sum of digits of divisors; A034690(k) = A034690(k+1).
%H A084049 Paolo P. Lava, <a href="/A084049/b084049.txt">Table of n, a(n) for n = 1..1000</a>
%t A084049 Flatten[Position[Partition[Table[Total[Flatten[IntegerDigits/@ Divisors[ n]]], {n,4000}],2,1],_?(#[[1]]==#[[2]]&),{1},Heads->False]] (* _Harvey P. Dale_, May 20 2013 *)
%K A084049 base,easy,nonn
%O A084049 1,1
%A A084049 _Jason Earls_, Jun 19 2003