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 A357388 #8 Sep 28 2022 03:53:04 %S A357388 1,3,5,9,14,21,32,43,54,65,67,84,101,115,118,135,144,152,173,202,221, %T A357388 231,258,260,289,295,318,332,347,369,376,405,409,423,434,450,476,491, %U A357388 530,532,573,589,614,648,655,696,707,736,737,766,778,803,819,825,860,870 %N A357388 Numbers k such that A071626(k) < A071626(k+1). %C A357388 Conjecture: This sequence has an asymptotic density 0.028..., which is the same as the asymptotic density of A357390 (see A357385). %H A357388 Amiram Eldar, <a href="/A357388/b357388.txt">Table of n, a(n) for n = 1..10000</a> %e A357388 1 is a term since A071626(1) = 0 < A071626(2) = 1. %t A357388 s[n_] := Length[Union[FactorInteger[n!][[;; , 2]]]]; s[1] = 0; Select[Range[1000], s[#] < s[# + 1] &] %Y A357388 Cf. A071626, A342091, A357385, A357390. %K A357388 nonn %O A357388 1,2 %A A357388 _Amiram Eldar_, Sep 26 2022