login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A128023 a(n) = A128022(n)/n. 1
1, 1, 1, 2, 3, 5, 9, 16, 28, 51, 92, 169, 312, 580, 1082, 2029, 3819, 7214, 13669, 25971, 49468, 94439, 180666, 346277, 664852, 1278561, 2462414, 4748941, 9170369, 17729380, 34314929, 66485175, 128940946, 250297130, 486291567, 945566936 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,4

LINKS

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

FORMULA

a(1)=1, a(n) = ceiling(sum{k=1 to n-1} A128022(k) /n).

MATHEMATICA

f[l_List] := Block[{n = Length[l] + 1}, Append[l, Ceiling[Sum[k*l[[k]], {k, n - 1}]/n]]]; Nest[f, {1}, 36] (*Chandler*)

CROSSREFS

Cf. A128022.

Sequence in context: A002572 A114834 A143961 * A000048 A056303 A074099

Adjacent sequences:  A128020 A128021 A128022 * A128024 A128025 A128026

KEYWORD

easy,nonn

AUTHOR

Leroy Quet, Feb 11 2007

EXTENSIONS

Extended by Ray Chandler, Feb 12 2007

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 21 17:07 EST 2019. Contains 319350 sequences. (Running on oeis4.)