|
%I #13 Jun 13 2018 23:03:54
%S 1,4,6,9,12,14,17,20,23,25,28,31,33,36,39,42,44,47,50,53,55,58,61,63,
%T 66,69,72,74,77,80,82,85,88,91,93,96,99,101,104,107,110,112,115,118,
%U 120,123,126,129,131,134,137,139,142,145,148,150,153,156,159,161,164
%N a(n) = floor((n+1)^(n+1)/n^n).
%C a(n) = floor(1/R) where R is the radius of convergence of the series S(x,n) = Sum_{k>=0} binomial(n*k, k)*x^k. - _Michel Lagneau_, Mar 09 2011
%H Harry J. Smith, <a href="/A060644/b060644.txt">Table of n, a(n) for n = 0..1000</a>
%F a(n) = A000312(n+1)/A000312(n) = floor(e*(n+1/2)) at least for terms shown.
%e a(7) = floor(8^8/7^7) = floor(16777216/823543) = floor(20.37...) = 20.
%o (PARI) { for (n=0, 1000, write("b060644.txt", n, " ", floor((n + 1)^(n + 1)/n^n)); ) } \\ _Harry J. Smith_, Jul 09 2009
%K nonn
%O 0,2
%A _Henry Bottomley_, Apr 17 2001
|
