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

Author

N. J. A. Sloane, Jul 04 2002

Keywords

• nonn

Links

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

Crossrefs

Cf. A005230.

Programs

Mathematica

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

Formula

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