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 A057922 #12 May 08 2019 16:41:55 %S A057922 1,2,5,7,11,13,14,17,19,21,23,26,29,31,33,34,37,38,39,41,43,44,47,49, %T A057922 53,55,57,59,61,65,67,69,71,73,75,77,79,83,85,86,87,89,93,94,95,97,98, %U A057922 101,103,104,107,109,113,116,118,119,122,125,127,129,131,133,134,135 %N A057922 d(n) divides d(n+1), where d(n) is number of positive divisors of n. %H A057922 Ivan Neretin, <a href="/A057922/b057922.txt">Table of n, a(n) for n = 0..10000</a> %e A057922 11 is included because d(11) = 2 divides d(12) = 6. %t A057922 Select[Range@150, Divisible @@ DivisorSigma[0, {# + 1, #}] &] (* _Ivan Neretin_, May 29 2015 *) %t A057922 Position[Partition[DivisorSigma[0,Range[150]],2,1],_?(Divisible[#[[2]], #[[1]]]&),1,Heads->False]//Flatten (* _Harvey P. Dale_, May 08 2019 *) %Y A057922 Cf. A057921, A005237. %K A057922 nonn %O A057922 0,2 %A A057922 _Leroy Quet_, Nov 11 2000