|
%I #10 Sep 28 2022 03:53:01
%S 64,113,132,151,216,247,278,309,340,371,402,422,433,469,515,558,601,
%T 644,687,730,731,773,792,816,853,859,914,975,1021,1036,1094,1097,1129,
%U 1156,1158,1167,1219,1240,1242,1244,1280,1313,1327,1341,1355,1386,1402,1410,1459
%N Numbers k such that A071626(k) > A071626(k+1).
%C Conjecture: This sequence has an asymptotic density 0.028..., which is the same as the asymptotic density of A357388 (see A357385).
%H Amiram Eldar, <a href="/A357390/b357390.txt">Table of n, a(n) for n = 1..10000</a>
%e 64 is a term since A071626(64) = 9 > A071626(65) = 8.
%t s[n_] := Length[Union[FactorInteger[n!][[;; , 2]]]]; s[1]=0; Select[Range[1500], s[#] > s[# + 1] &]
%Y Cf. A071626, A342091, A357385, A357388.
%K nonn
%O 1,1
%A _Amiram Eldar_, Sep 26 2022
|
