A302546 a(n) = Sum_{k = 1...n} 2^binomial(n, k).

0, 2, 6, 18, 98, 2114, 1114242, 68723671298, 1180735735906024030722, 170141183460507917357914971986913657858, 7237005577335553223087828975127304179197147198604070555943173844710572689410

Offset

0,2

Links

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

Formula

a(n) = A001315(n) - 2.

Mathematica

Table[Sum[2^Binomial[n, d], {d, n}], {n, 10}]

Prog

(PARI) a(n) = sum(k=1, n, 2^binomial(n, k)); \\ Michel Marcus, Jun 21 2018

Crossrefs

Cf. A001315, A003465, A034729, A055621, A302545.

Sequence in context: A000138 A028857 A052687 * A162059 A162060 A162061

Adjacent sequences: A302543 A302544 A302545 * A302547 A302548 A302549

Keyword

nonn

Author

Gus Wiseman, Jun 20 2018

Status

approved