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.

A171843 Triangle read by rows = truncated columns of an array formed by variants of the natural number decrescendo triangle, A004736.

This page as a plain text file.
%I A171843 #14 Apr 14 2021 05:23:28
%S A171843 1,1,3,1,3,8,1,3,6,21,1,3,6,12,55,1,3,6,10,24,144,1,3,6,10,17,48,377,
%T A171843 1,3,6,10,15,30,96,987,1,3,6,10,15,23,53,192,2584,1,3,6,10,15,21,37,
%U A171843 93,384,6765,1,3,6,10,15,21,30,61,163,768,17711,1,3,6,10,15,21,28,45,100,286,1536,46368
%N A171843 Triangle read by rows = truncated columns of an array formed by variants of the natural number decrescendo triangle, A004736.
%C A171843 Rows tend to the triangular series, A000217.
%C A171843 Let T(n) be the variants of the natural number decrescendo triangle, A004736; such that T(n) = A004736, prepending n ones to the leftmost column. Then take Lim_{k=1..inf} ((T(n))^k, left-shifted vectors considered as sequences = rows of the array, deleting the first 1. The rows of this triangle sequence are the truncated columns of the array with one "1" per row.
%H A171843 Andrew Howroyd, <a href="/A171843/b171843.txt">Table of n, a(n) for n = 1..1275</a> (rows 1..50)
%e A171843 First few rows of the array are:
%e A171843 .
%e A171843   1, 3, 8, 21, 55, 144, 377, 987, ...
%e A171843   1, 1, 3,  6, 12,  24,  48,  96, ...
%e A171843   1, 1, 1,  3,  6,  10,  17,  30, ...
%e A171843   1, 1, 1,  1,  3,   6,  10,  15, ...
%e A171843   1, 1, 1,  1,  1,   3,   6,  10, ...
%e A171843   ...
%e A171843 First few rows of the triangle =
%e A171843   1;
%e A171843   1, 3;
%e A171843   1, 3, 8;
%e A171843   1, 3, 6, 21;
%e A171843   1, 3, 6, 12, 55;
%e A171843   1, 3, 6, 10, 24, 144;
%e A171843   1, 3, 6, 10, 17, 48, 377;
%e A171843   1, 3, 6, 10, 15, 30, 96, 987;
%e A171843   1, 3, 6, 10, 15, 23, 53, 192, 2584;
%e A171843   1, 3, 6, 10, 15, 21, 37, 93, 384, 6765;
%e A171843   1, 3, 6, 10, 15, 21, 30, 61, 163, 768, 17711;
%e A171843   1, 3, 6, 10, 15, 21, 28, 45, 100, 286, 1536, 46368;
%e A171843   ...
%e A171843 Example: Row 2 of the array is generated from a variant of A004736, the leftmost column with two prepended 1's, = T(2):
%e A171843   1;
%e A171843   1;
%e A171843   1;
%e A171843   2, 1;
%e A171843   3, 2, 1;
%e A171843   ...
%e A171843 Take lim_{k->inf.} (P(2))^k, obtaining a left-shifted vector considered as a sequence; then delete the first 1, getting row 2 of the array.
%o A171843 (PARI)
%o A171843 T(n)={[Vec(p) | p<-Vec(sum(k=1, n, x^k*y^(k-1)*(1 - x^k)/((1 - x)*(1 - 2*x + x^2 - x^k)) + O(x*x^n)))]}
%o A171843 { my(A=T(10)); for(n=1, #A, print(A[n])) } \\ _Andrew Howroyd_, Apr 13 2021
%Y A171843 Row sums are A171844.
%Y A171843 Diagonals include A001906, A003945, A259968.
%Y A171843 Cf. A004736.
%K A171843 nonn,tabl
%O A171843 1,3
%A A171843 _Gary W. Adamson_, Dec 19 2009
%E A171843 a(52) corrected and terms a(56) and beyond from _Andrew Howroyd_, Apr 13 2021