cp's OEIS Frontend

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.

A370233 Triangle read by rows. T(n, k) = (n - k + 1) * binomial(n + k + 1, 2*k)^2 / (n + k + 1).

This page as a plain text file.
%I A370233 #10 Feb 14 2024 05:44:01
%S A370233 1,1,3,1,18,5,1,60,75,7,1,150,525,196,9,1,315,2450,2352,405,11,1,588,
%T A370233 8820,17640,7425,726,13,1,1008,26460,97020,81675,18876,1183,15,1,1620,
%U A370233 69300,426888,637065,286286,41405,1800,17,1,2475,163350,1585584,3864861,3006003,828100,81600,2601,19
%N A370233 Triangle read by rows. T(n, k) = (n - k + 1) * binomial(n + k + 1, 2*k)^2 / (n + k + 1).
%F A370233 T(n, k) = [z^k] P(n, z) where P(n, z) = Sum_{k=0..n} binomial(n + k, 2*k) * Pochhammer(n - k + c, 2*k) * z^k / (2*k)! and c = 2.
%F A370233 T(n, k) = [z^k] hypergeom([-1 - n, -n, 1 + n, 2 + n], [1/2, 1/2, 1], z/16).
%e A370233 Triangle starts:
%e A370233 [0] 1;
%e A370233 [1] 1,    3;
%e A370233 [2] 1,   18,     5;
%e A370233 [3] 1,   60,    75,      7;
%e A370233 [4] 1,  150,   525,    196,      9;
%e A370233 [5] 1,  315,  2450,   2352,    405,     11;
%e A370233 [6] 1,  588,  8820,  17640,   7425,    726,    13;
%e A370233 [7] 1, 1008, 26460,  97020,  81675,  18876,  1183,   15;
%e A370233 [8] 1, 1620, 69300, 426888, 637065, 286286, 41405, 1800, 17;
%p A370233 T := (n, k) -> (n - k + 1)*binomial(n + k + 1, 2*k)^2/(n + k + 1):
%p A370233 seq(print(seq(T(n, k), k = 0..n)), n = 0..8);
%t A370233 P[n_, z_] := HypergeometricPFQ[{-1 - n, -n, 1 + n, 2 + n}, {1/2, 1/2, 1}, z/16];
%t A370233 Table[CoefficientList[P[n, z], z], {n, 0, 9}] // Flatten
%Y A370233 Cf. A370232 (c=1), A370234 (row sums).
%K A370233 nonn,tabl
%O A370233 0,3
%A A370233 _Peter Luschny_, Feb 13 2024