A367255 a(n) = (n + 1)^(n - 2)*(3*n + 1).

1, 2, 7, 40, 325, 3456, 45619, 720896, 13286025, 280000000, 6645125311, 175432531968, 5100764198413, 161982606786560, 5579092529296875, 207165582859042816, 8250513501410645521, 350825312056827838464, 15864277746219164222455, 760217600000000000000000

Offset

0,2

Links

Table of n, a(n) for n=0..19.

Formula

a(n) = Sum_{k=0..n} binomial(n - 1, k - 1) * n^(n - k) * (k + 1). (See A137452.)

Maple

a := n -> (n + 1)^(n - 2)*(3*n + 1): seq(a(n), n = 0..19);

Mathematica

A367255[n_]:=(n+1)^(n-2)(3n+1);
Array[A367255, 25, 0] (* Paolo Xausa, Dec 01 2023 *)

Crossrefs

Cf. A137452.

Sequence in context: A346220 A166904 A105625 * A135082 A372348 A102317

Adjacent sequences: A367252 A367253 A367254 * A367256 A367257 A367258

Keyword

nonn

Author

Peter Luschny, Nov 11 2023

Status

approved