|
|
1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5, 6, 7, 8, 9, 11, 13, 15, 17, 20, 23, 27, 32, 37, 43, 50, 59, 69, 80, 93, 109, 127, 148, 173, 202, 235, 275, 320, 374, 436, 509, 594, 693, 808, 943, 1100, 1283, 1497, 1747, 2038, 2377, 2774, 3236, 3775, 4404, 5138, 5995, 6994
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,8
|
|
|
LINKS
|
Table of n, a(n) for n=1..62.
|
|
|
MATHEMATICA
|
f[s_] := Append[s, Ceiling[Plus @@ s/5]]; Nest[f, {1}, 61] (* Robert G. Wilson v *)
|
|
|
CROSSREFS
|
Cf. A112088, A072493, A011782, A073941, A072493, A120160, A120170, A120186, A120194, A120202.
Sequence in context: A214129 A280151 A094990 * A120179 A032739 A240868
Adjacent sequences: A120175 A120176 A120177 * A120179 A120180 A120181
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Graeme McRae, Jun 10 2006
|
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v, Jul 07 2006
|
|
|
STATUS
|
approved
|
|
