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 A053244 #7 Oct 27 2023 22:00:45 %S A053244 5,29,34,65,70,94,99,123,198,227,239,244,274,280,304,310,327,332,362, %T A053244 373,391,402,421,452,481,492,510,539,601,612,636,654,659,719,749,761, %U A053244 811,816,821,832,899,904,927,958,1033,1050,1081,1110,1115,1139,1201 %N A053244 Numbers n such that A053238(n) = 4. %p A053244 with(numtheory): f := [seq( `if`((sigma(i) > sigma(i+1)),i,print( )), i=1..8000)]; %p A053244 seq( `if`(f[i+1] - f[i] = 4,i,print( )), i=1..3000); %Y A053244 Cf. A000203, A053226, A053238, A053239, A053240, A053241, A053242, A053243, A053245. %K A053244 nonn %O A053244 1,1 %A A053244 _Asher Auel_, Jan 10 2000