A120192 a(1)=7; a(n)=floor((55+sum(a(1) to a(n-1)))/7).

7, 8, 10, 11, 13, 14, 16, 19, 21, 24, 28, 32, 36, 42, 48, 54, 62, 71, 81, 93, 106, 121, 138, 158, 181, 207, 236, 270, 308, 352, 403, 460, 526, 601, 687, 785, 897, 1025, 1172, 1339

Offset

1,1

Links

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

Mathematica

Module[{lst={7}}, Do[AppendTo[lst, Floor[(55+Total[lst])/7]], {40}]; lst] (* Harvey P. Dale, Sep 06 2012 *)

Crossrefs

Cf. A073941, A112088, A072493.

Sequence in context: A337468 A105860 A096677 * A333490 A256651 A093678

Adjacent sequences: A120189 A120190 A120191 * A120193 A120194 A120195

Keyword

nonn

Author

Graeme McRae, Jun 10 2006

Status

approved