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 A358101 #18 Nov 05 2022 05:47:22
%S A358101 1,2,4,6,12,20,30,40,60,120,240,360,420,840,1260,2520,5040,8640,10080,
%T A358101 15120,20160,30240,60480,120960,181440,362880,544320,786240,1572480,
%U A358101 1874880,3749760,5624640,7862400,14938560,23587200,24373440,31872960,63745920,95618880
%N A358101 Positions of records in A358099, i.e., integers whose number of divisors whose decimal digits are in strictly decreasing order sets a new record.
%C A358101 As A009995 is finite, this sequence is necessarily finite.
%C A358101 Corresponding records are 1, 2, 3, 4, 5, 6, 7, 8, 10, 11, ...
%e A358101 a(9) = 60 is in the sequence because A358099(60) = 10 is larger than any earlier value in A358099.
%t A358101 f[n_] := DivisorSum[n, 1 &, Greater @@ IntegerDigits[#] &]; fm = 0; s = {}; Do[If[(fn = f[n]) > fm, fm = fn; AppendTo[s, n]], {n, 1, 10^6}]; s (* _Amiram Eldar_, Nov 03 2022 *)
%Y A358101 Cf. A009995, A190219, A358099, A358100.
%Y A358101 Similar sequences: A093036, A340548, A357173.
%K A358101 nonn,base,fini
%O A358101 1,2
%A A358101 _Bernard Schott_, Nov 03 2022
%E A358101 More terms from _Amiram Eldar_, Nov 03 2022