|
%I #8 Jun 24 2018 18:31:22
%S 1,1,2,4,5,6,8,9,10,11,13,14,15,16,18,19,20,21,23,24,25,26,28,29,30,
%T 31,32,34,35,36,37,38,40,41,42,43,44,46,47,48,49,50,52,53,54,55,56,58,
%U 59,60,61,62,64,65,66,67,68,70,71,72,73,74,75,77,78,79,80,81,83,84,85,86
%N a(n) satisfies a(n)! <= n^n < (a(n)+1)!.
%H Harry J. Smith, <a href="/A064318/b064318.txt">Table of n, a(n) for n = 0..1000</a>
%e a(5)=6 since 6! = 720 <= 5^5 = 3125 < 7! = 5040.
%o (PARI) { a=1; for (n=0, 1000, p=n^n; if (n>1, a++); until (a! > p, a++); a--; write("b064318.txt", n, " ", a) ) } \\ _Harry J. Smith_, Sep 11 2009
%Y Cf. A000142, A000312, A064317.
%K nonn
%O 0,3
%A _Henry Bottomley_, Sep 10 2001
|
