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 A163193 #16 Mar 15 2024 02:23:25
%S A163193 12,70,88,204,220,1750,1888,2958,8142,8632,9114,14664,18414,18762,
%T A163193 20118,20712,25194,45520,64206,65652,65964,77814,79338,79824,85096,
%U A163193 90804,103410,103644,117822,158946,163938,176364,185776,186612,194416,202656,203898,245632
%N A163193 Numbers k such that sigma(k) = 2*sigma(k+1).
%C A163193 The cases sigma(k) = 3*sigma(k+1) are rarer: k=180, 12000, 30996, 47940, ... [_R. J. Mathar_, Jul 25 2009]
%H A163193 Donovan Johnson, <a href="/A163193/b163193.txt">Table of n, a(n) for n = 1..1000</a>
%F A163193 {k: A000203(k) = 2*A000203(k+1)}.
%t A163193 f[n_]:=DivisorSigma[1,n]; lst={};Do[If[f[n]==f[n+1]*2,AppendTo[lst,n]], {n,9!}];lst
%Y A163193 Cf. A067081, A002961, A058073.
%K A163193 nonn
%O A163193 1,1
%A A163193 _Vladimir Joseph Stephan Orlovsky_, Jul 22 2009
%E A163193 Edited by _R. J. Mathar_, Jul 25 2009