login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A295112 a(n) = Sum_{k=0..n} binomial(n,2*k)*binomial(2*k,k)/(2*k-1). 3
-1, -1, 1, 5, 13, 29, 63, 139, 317, 749, 1827, 4575, 11699, 30419, 80161, 213573, 574253, 1556077, 4244835, 11647151, 32122231, 88995879, 247573565, 691246369, 1936445619, 5441165699, 15331341373, 43308322049, 122624939677, 347957102909, 989335822559, 2818200111867 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,4
COMMENTS
As binomial(2*k,k) = 2*(2*k-1)*A000108(k-1) for all k = 1,2,..., we see that a(n) is always an odd integer. Clearly, a(n) > 0 for all n > 1. a(n) can be viewed as an analog of Motzkin numbers, which should have some combinatorial interpretations.
Conjecture: The sequence a(n+1)/a(n) (n = 5,6,...) is strictly increasing with limit 3, and the sequence a(n+1)^(1/(n+1))/a(n)^(1/n) (n = 9,10,...) is strictly decreasing to the limit 1.
See also A295113 for a conjecture involving the current sequence.
LINKS
Min Bian, Olivia X. M. Yao, Yan Zhang, Alina F. Y. Zhao, Proof of a conjecture of Z. W. Sun, Contributions to Discrete Mathematics (2019) Vol. 14, No. 1, 214-221.
Zhi-Wei Sun, Conjectures involving arithmetical sequences, arXiv:1208.2683 [math.CO], 2012-2013; in: Number Theory: Arithmetic in Shangri-La (eds., S. Kanemitsu, H. Li and J. Liu), Proc. 6th China-Japan Seminar (Shanghai, August 15-17, 2011), World Sci., Singapore, 2013, pp. 244-258.
FORMULA
Via the Zeilberger algorithm we have the recurrence: (n+3)*a(n+3) = (3n+7)*a(n+2) + (n-5)*a(n+1) - 3*(n+1)*a(n) for any nonnegative integer n.
a(n) = -hypergeom([-1/2, 1/2 - n/2, -n/2], [1/2, 1], 4). - Peter Luschny, Nov 15 2017
a(n) ~ 3^(n + 3/2) / (4*sqrt(Pi)*n^(3/2)). - Vaclav Kotesovec, Nov 15 2017
EXAMPLE
a(3) = 5 since binomial(3,2*0)*binomial(2*0,0)/(2*0-1) + binomial(3,2*1)*binomial(2*1,1)/(2*1-1) = -1 + 3*2 = 5.
MAPLE
a := n -> -hypergeom([-1/2, 1/2 - n/2, -n/2], [1/2, 1], 4):
seq(simplify(a(n)), n=0..31); # Peter Luschny, Nov 15 2017
MATHEMATICA
W[n_]:=W[n]=Sum[Binomial[n, 2k]Binomial[2k, k]/(2k-1), {k, 0, n/2}]; Table[W[n], {n, 0, 35}]
a[n_] := -AppellF1[-n, -1/2, -1/2, 1, 2, -2]; Table[a[n], {n, 0, 31}] (* Peter Luschny, Nov 15 2017 *)
CROSSREFS
Sequence in context: A050415 A099970 A073857 * A239367 A124698 A337761
KEYWORD
sign,easy
AUTHOR
Zhi-Wei Sun, Nov 14 2017
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 05:39 EDT 2024. Contains 371235 sequences. (Running on oeis4.)