A147716 - OEIS

A147716

Triangle of coefficients in expansion of (14 + x)^n.

1, 14, 1, 196, 28, 1, 2744, 588, 42, 1, 38416, 10976, 1176, 56, 1, 537824, 192080, 27440, 1960, 70, 1, 7529536, 3226944, 576240, 54880, 2940, 84, 1, 105413504, 52706752, 11294304, 1344560, 96040, 4116, 98, 1, 1475789056, 843308032, 210827008, 30118144, 2689120, 153664, 5488, 112, 1

(list; table; graph; refs; listen; history; text; internal format)

OFFSET

0,2

COMMENTS

Triangle T(n,k), read by rows, given by [14, 0, 0, 0, 0, 0, 0, ...] DELTA [1, 0, 0, 0, 0, 0, 0, ...] where DELTA is the operator defined in A084938.

LINKS

G. C. Greubel, Rows n = 0..50 of the triangle, flattened

FORMULA

T(n,k) = binomial(n,k) * 14^(n-k).

G.f.: 1/(1 - 14*x - x*y). - R. J. Mathar, Aug 12 2015

Sum_{k=0..n} T(n, k) = 15^n = A001024(n). - G. C. Greubel, May 15 2021

EXAMPLE

Triangle begins :

14, 1;

196, 28, 1;

2744, 588, 42, 1;

38416, 10976, 1176, 56, 1;

537824, 192080, 27440, 1960, 70, 1;

MATHEMATICA

With[{m=8}, CoefficientList[CoefficientList[Series[1/(1-14*x-x*y), {x, 0, m}, {y, 0, m}], x], y]]//Flatten (* Georg Fischer, Feb 17 2020 *)

PROG

(Magma) [14^(n-k)*Binomial(n, k): k in [0..n], n in [0..12]]; // G. C. Greubel, May 15 2021

(Sage) flatten([[14^(n-k)*binomial(n, k) for k in (0..n)] for n in (0..12)]) # G. C. Greubel, May 15 2021

CROSSREFS

Cf. A001024, A023531, A130595.

Sequences of the form q^(n-k)*binomial(n, k): A007318 (q=1), A038207 (q=2), A027465 (q=3), A038231 (q=4), A038243 (q=5), A038255 (q=6), A027466 (q=7), A038279 (q=8), A038291 (q=9), A038303 (q=10), A038315 (q=11), A038327 (q=12), A133371 (q=13), this sequence (q=14), A027467 (q=15).

Sequence in context: A097181 A040209 A071713 * A223516 A350888 A348335

Adjacent sequences: A147713 A147714 A147715 * A147717 A147718 A147719

KEYWORD

easy,nonn,tabl

AUTHOR

Philippe Deléham, Nov 11 2008

EXTENSIONS

a(36) corrected by Georg Fischer, Feb 17 2020

STATUS

approved