A153758 a(n) = Sum_{k=1..n} A153757(k).

1, 3, 7, 17, 57, 337, 3737, 72657, 2369257, 127188257, 11156500857, 1592432891857, 369041278550057, 138668563737942657, 84415532990575319257, 83213455958038482903857, 132788829902694935512664457, 342962001904259249964245209057

Offset

1,2

Links

Table of n, a(n) for n=1..18.

Formula

A000012 * A153757 = A000012^2 * A003266; where A000012 = the partial sum operator as an infinite lower triangular matrix.

Example

a(4) = 17 = (1 + 2 + 4 + 10), where A153757 = (1, 2, 4, 10, 40, 280, ...).

Mathematica

a[n_] := Sum[Fibonorial[k], {k, 1, n}]; Accumulate @ Table[a[n], {n, 1, 20}] (* Amiram Eldar, Feb 26 2020 *)

Crossrefs

Cf. A153757, A003266.

Sequence in context: A359174 A260349 A146147 * A079634 A357784 A047981

Adjacent sequences: A153755 A153756 A153757 * A153759 A153760 A153761

Keyword

nonn

Author

Gary W. Adamson, Dec 31 2008

Extensions

More terms from Amiram Eldar, Feb 26 2020

Status

approved