editing
approved
editing
approved
Limit a(n)/a(n+1) = ( 1 - t = t^3 = 0.3176721961... where t = ((sqrt(93)+9)/18)^(1/3) - ((sqrt(93)-9)/18)^(1/3) )^3 = 0.3176721961...
approved
editing
editing
approved
What is limit Limit a(n+1)/a(n+1) = ( ((sqrt(93)+9)/18)^(1/3)? Specific value: a - ((sqrt(3000193)-9)/a18)^(300001/3) ) = ^3 = 0.147794111603176721961...
approved
editing
editing
approved
What is limit a(n+1)/a(n)? Specific value: a(30001)/a(30000) = 3.14779411160...
Paul D. Hanna, <a href="/A248658/b248658.txt">Table of n, a(n) for n = 0..500</a>
G.f.: A(x) = Sum_{n>=0} (3n3*n)!/(n!)^3 * x^(4*n) / (1-x-x^3)^(3*n+1).
approved
editing
editing
approved
Table[Sum[Binomial[n-2*k, k]^3, {k, 0, Floor[n/3]}], {n, 0, 20}] (* Vaclav Kotesovec, Oct 15 2014 *)
approved
editing
editing
approved
G.f.: Sum_{n>=0} x^n * Sum_{k=0..n} binomial(n,k)^3 * x^(2*k).
G.f.: A(x) = Sum_{n>=0} (3n)!/(n!)^3 * x^(4*n) / (1-x-x^3)^(3n3*n+1).
G.f. A(x) = 1 + x + x^2 + 2*x^3 + 9*x^4 + 28*x^5 + 66*x^6 + 153*x^7 +...
(PARI) {a(n)=local(A=1); A=sum(m=0, n, x^m*sum(k=0, m, binomial(m, k)^3*x^(2*k)) +x*O(x^n)); polcoeff(A, n)}
approved
editing