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.

A318775 Triangle read by rows: T(0,0) = 1; T(n,k) = T(n-1,k) + 2 * T(n-5,k-1) for k = 0..floor(n/5); T(n,k)=0 for n or k < 0.

This page as a plain text file.
%I A318775 #13 Aug 08 2025 23:28:59
%S A318775 1,1,1,1,1,1,2,1,4,1,6,1,8,1,10,1,12,4,1,14,12,1,16,24,1,18,40,1,20,
%T A318775 60,1,22,84,8,1,24,112,32,1,26,144,80,1,28,180,160,1,30,220,280,1,32,
%U A318775 264,448,16,1,34,312,672,80,1,36,364,960,240,1,38,420,1320,560,1,40,480,1760,1120
%N A318775 Triangle read by rows: T(0,0) = 1; T(n,k) = T(n-1,k) + 2 * T(n-5,k-1) for k = 0..floor(n/5); T(n,k)=0 for n or k < 0.
%C A318775 The numbers in rows of the triangle are along a "fourth layer" skew diagonals pointing top-right in center-justified triangle given in A013609 ((1+2*x)^n) and along a "fourth layer" skew diagonals pointing top-left in center-justified triangle given in A038207 ((2+x)^n), see links. (Note: First layer skew diagonals in center-justified triangles of coefficients in expansions of (1+2*x)^n and (2+x)^n are given in A128099 and A207538 respectively.)
%C A318775 The coefficients in the expansion of 1/(1-x-2*x^5) are given by the sequence generated by the row sums.
%C A318775 The row sums give A318777.
%C A318775 If s(n) is the row sum at n, then the ratio s(n)/s(n-1) is approximately 1.4510850920547191..., when n approaches infinity.
%D A318775 Shara Lalo and Zagros Lalo, Polynomial Expansion Theorems and Number Triangles, Zana Publishing, 2018, ISBN: 978-1-9995914-0-3.
%H A318775 Zagros Lalo, <a href="/A318775/a318775.pdf">Fourth layer skew diagonals in center-justified triangle of coefficients in expansion of (1 + 2x)^n</a>
%H A318775 Zagros Lalo, <a href="/A318775/a318775_1.pdf">Fourth layer skew diagonals in center-justified triangle of coefficients in expansion of (2 + x)^n</a>
%F A318775 T(n,k) = 2^k / ((n - 5*k)! k!) * (n - 4*k)! where n >= 0 and 0 <= k <= floor(n/5).
%e A318775 Triangle begins:
%e A318775   1;
%e A318775   1;
%e A318775   1;
%e A318775   1;
%e A318775   1;
%e A318775   1,  2;
%e A318775   1,  4;
%e A318775   1,  6;
%e A318775   1,  8;
%e A318775   1, 10;
%e A318775   1, 12,   4;
%e A318775   1, 14,  12;
%e A318775   1, 16,  24;
%e A318775   1, 18,  40;
%e A318775   1, 20,  60;
%e A318775   1, 22,  84,    8;
%e A318775   1, 24, 112,   32;
%e A318775   1, 26, 144,   80;
%e A318775   1, 28, 180,  160;
%e A318775   1, 30, 220,  280;
%e A318775   1, 32, 264,  448,  16;
%e A318775   1, 34, 312,  672,  80;
%e A318775   1, 36, 364,  960, 240;
%e A318775   1, 38, 420, 1320, 560;
%e A318775   ...
%t A318775 t[n_, k_] := t[n, k] = 2^k/((n - 5 k)! k!) (n - 4 k)!; Table[t[n, k], {n, 0, 24}, {k, 0, Floor[n/5]} ] // Flatten
%t A318775 t[0, 0] = 1; t[n_, k_] := t[n, k] = If[n < 0 || k < 0, 0, t[n - 1, k] + 2 t[n - 5, k - 1]]; Table[t[n, k], {n, 0, 24}, {k, 0, Floor[n/5]}] // Flatten
%Y A318775 Row sums give A318777.
%Y A318775 Cf. A013609, A038207, A128099, A207538.
%K A318775 tabf,nonn,easy
%O A318775 0,7
%A A318775 _Zagros Lalo_, Sep 04 2018