This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A344394 #15 Dec 23 2024 21:50:32
%S A344394 1,1,2,5,9,25,44,133,230,726,1242,4037,6853,22737,38376,129285,217242,
%T A344394 740554,1239980,4266830,7123765,24701425,41141916,143567173,238637282,
%U A344394 837212650,1389206210,4896136845,8112107475,28703894775,47495492400,168640510725,278722764954
%N A344394 a(n) = binomial(n, n/2 - 1/4 + (-1)^n/4)*hypergeom([-n/4 - 1/8 + (-1)^n/8, -n/4 + 3/8 + (-1)^n/8], [n/2 + 7/4 + (-1)^n/4], 4).
%C A344394 Related to the Motzkin triangle A064189 counting certain lattice paths.
%F A344394 a(n) = Sum_{j = 0..n} C(n, j)*(C(n - j, j + n/2 - 1/4 + (-1)^n/4) - C(n - j, j + n/2 + 7/4 + (-1)^n/4)).
%F A344394 a(n) = A064189(n, floor(n/2)), the middle column of the Motzkin triangle.
%F A344394 a(n) = A026300(n, ceiling(n/2)).
%p A344394 alias(C=binomial):
%p A344394 a := n -> add(C(n, j)*(C(n - j, j + n/2 - 1/4 + (-1)^n/4) - C(n - j, j + n/2 + 7/4 + (-1)^n/4)), j = 0..n): seq(a(n), n = 0..32);
%t A344394 a[n_] := Binomial[n, n/2 - 1/4 + (-1)^n/4] Hypergeometric2F1[-n/4 - 1/8 + (-1)^n/8, -n/4 + 3/8 + (-1)^n/8, n/2 + 7/4 + (-1)^n/4, 4];
%t A344394 Table[a[n], {n, 0, 32}]
%Y A344394 Cf. A026300, A064189, A026302 (even bisection), A344396 (odd bisection), A327871.
%K A344394 nonn
%O A344394 0,3
%A A344394 _Peter Luschny_, May 19 2021