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.

A185874 Second accumulation array of A051340, by antidiagonals.

This page as a plain text file.
%I A185874 #26 Jul 20 2017 02:20:00
%S A185874 1,3,4,6,11,10,10,21,26,20,15,34,48,50,35,21,50,76,90,85,56,28,69,110,
%T A185874 140,150,133,84,36,91,150,200,230,231,196,120,45,116,196,270,325,350,
%U A185874 336,276,165,55,144,248,350,435,490,504,468,375,220,66,175,306,440,560,651,700,696,630,495,286,78,209,370,540,700,833,924,960,930,825,638,364,91,246,440,650,855,1036,1176,1260,1275,1210,1056,806,455,105,286,516,770,1025,1260,1456,1596,1665,1650,1540,1326,1001,560
%N A185874 Second accumulation array of A051340, by antidiagonals.
%C A185874 A member of the accumulation chain: A051340 < A141419 < A185874 < A185875 < A185876 < ... (See A144112 for the definition of accumulation array.)
%H A185874 G. C. Greubel, <a href="/A185874/b185874.txt">Table of n, a(n) for the first 50 rows, flattened</a>
%H A185874 Johann Cigler, <a href="https://arxiv.org/abs/1611.05252">Some elementary observations on Narayana polynomials and related topics</a>, arXiv:1611.05252 [math.CO], 2016. See p. 24.
%F A185874 T(n,k) = k*n*(n+1)*(2*n+3*k+1)/12 for k>=1, n>=1.
%e A185874 Northwest corner:
%e A185874 .   1,   3,   6,   10,   15,   21,   28,   36,   45,   55, ...
%e A185874 .   4,  11,  21,   34,   50,   69,   91,  116,  144,  175, ...
%e A185874 .  10,  26,  48,   76,  110,  150,  196,  248,  306,  370, ...
%e A185874 .  20,  50,  90,  140,  200,  270,  350,  440,  540,  650, ...
%e A185874 .  35,  85, 150,  230,  325,  435,  560,  700,  855, 1025, ...
%e A185874 .  56, 133, 231,  350,  490,  651,  833, 1036, 1260, 1505, ...
%e A185874 .  84, 196, 336,  504,  700,  924, 1176, 1456, 1764, 2100, ...
%e A185874 . 120, 276, 468,  696,  960, 1260, 1596, 1968, 2376, 2820, ...
%e A185874 . 165, 375, 630,  930, 1275, 1665, 2100, 2580, 3105, 3675, ...
%e A185874 . 220, 495, 825, 1210, 1650, 2145, 2695, 3300, 3960, 4675, ...
%e A185874 ...
%t A185874 f[n_, k_] := (1/12)*k*n*(1 + n)*(1 + 3*k + 2*n);
%t A185874 TableForm[Table[f[n, k], {n, 1, 10}, {k, 1, 15}]]
%t A185874 Table[f[n - k + 1, k], {n, 14}, {k, n, 1, -1}] // Flatten
%Y A185874 Cf. A144112, A051340, A141419, A185875, A185876.
%Y A185874 Row 1 to 5: A000217, A115056, 2*A140096, 10*A000096, 5*A059845.
%Y A185874 Column 1 to 3: A000292, A051925, A267370 and 3*A005581.
%Y A185874 Main diagonal: A117066.
%K A185874 nonn,tabl,easy
%O A185874 1,2
%A A185874 _Clark Kimberling_, Feb 05 2011
%E A185874 Edited by _Bruno Berselli_, Jan 14 2016