A066777 First differences of Stern's sequence A005230.

0, 1, 1, 3, 5, 9, 20, 37, 71, 137, 285, 550, 1080, 2123, 4175, 8498, 16711, 33137, 65724, 130368, 258613, 521549, 1034600, 2060702, 4104693, 8176249, 16286774, 32443180, 65149296, 129777043, 259032537, 517030474, 1032000246, 2059895799, 4111615349

Offset

0,4

Links

Paolo Xausa, Table of n, a(n) for n = 0..1000

Formula

a(n) = A005230(n+2) - A005230(n+1). - Paolo Xausa, Sep 28 2023

Mathematica

A066777list[nmax_]:=Differences[Nest[Append[#, Total[Take[#, -Ceiling[(Sqrt[8Length[#]+1]-1)/2]]]]&, {1}, nmax+1]]; A066777list[35] (* Paolo Xausa, Sep 28 2023 *)

Crossrefs

Cf. A005230.

Sequence in context: A146940 A146251 A281732 * A260353 A065901 A053662

Adjacent sequences: A066774 A066775 A066776 * A066778 A066779 A066780

Keyword

nonn

Author

N. J. A. Sloane, Jul 04 2002

Status

approved