%I #9 Jan 19 2018 17:02:23
%S 1,2,4,7,10,14,18,22,26,30,35,39,44,49,54,59,64,69,74,80,85,90,96,102,
%T 107,113,119,124,130,136,142,148,154,160,166,173,179,185,191,198,204,
%U 210,217,223,230,236,243,249,256,263,269,276,283,290,296,303,310
%N Position of n! in the joint ranking of {2^h} and {k!}, where h >= 0, k >= 0.
%C In the joint ranking, duplicates are removed.
%H Clark Kimberling, <a href="/A276208/b276208.txt">Table of n, a(n) for n = 1..999</a>
%e The joint ranking is (1,2,4,6,8,16,24,32,64,120,128,...), in which the positions of n! are 1,2,4,7,...
%t t = Join[{1}, -1 + Table[n + Floor[Log[2, n!]], {n, 2, 150}]]
%Y Cf. A000079, A000142.
%K nonn,easy
%O 1,2
%A _Clark Kimberling_, Aug 31 2016
|