A120199 a(1)=6; a(n)=floor((53+sum(a(1) to a(n-1)))/8).

6, 7, 8, 9, 10, 11, 13, 14, 16, 18, 20, 23, 26, 29, 32, 36, 41, 46, 52, 58, 66, 74, 83, 93, 105, 118, 133, 150, 168, 189, 213, 240, 270, 303, 341, 384, 432, 486, 547, 615, 692, 778, 876, 985, 1108, 1247, 1403, 1578, 1775, 1997, 2247, 2528, 2844, 3199, 3599

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

nxt[{t_, a_}]:=Module[{c=Floor[(53+t)/8]}, {t+c, c}]; Transpose[ NestList[ nxt, {6, 6}, 60]][[2]] (* Harvey P. Dale, Jan 05 2016 *)

Crossrefs

Cf. A073941, A112088, A072493.

Sequence in context: A023384 A053407 A199162 * A162786 A269801 A250048

Adjacent sequences: A120196 A120197 A120198 * A120200 A120201 A120202

Keyword

nonn

Author

Graeme McRae, Jun 10 2006

Extensions

More terms from Harvey P. Dale, Jan 05 2016

Status

approved