login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A154280 List of pairs (a(n),b(n)): f(n) = A004001(n); a(n) = f(n) + a(n-1); b(n) = f(n)*b(n-1). 1
0, 1, 1, 1, 2, 1, 4, 2, 6, 4, 9, 12, 13, 48, 17, 192, 21, 768, 26, 3840, 32, 23040, 39, 161280, 46, 1128960, 54, 9031680, 62, 72253440, 70, 578027520, 78, 4624220160, 87, 41617981440, 97, 416179814400, 108, 4577977958400, 120, 54935735500800, 132 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,5

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..1001

MATHEMATICA

(*A004001*) f[0] = 0; f[1] = 1; f[2] = 1; f[n_] := f[n] = f[f[n - 1]] + f[n - f[n - 1]];

a[0] = 0; a[n_] := a[n] = f[n] + a[n - 1];

b[0] = 1; b[1] = 1; b[n_] := b[n] = (f[n])*b[n - 1];

Flatten[Table[{a[n], b[n]}, {n, 0, 30}]]

CROSSREFS

Cf. A004001.

Sequence in context: A340621 A008733 A244515 * A004795 A161268 A176837

Adjacent sequences:  A154277 A154278 A154279 * A154281 A154282 A154283

KEYWORD

nonn,tabf

AUTHOR

Roger L. Bagula, Jan 06 2009

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 April 22 13:29 EDT 2021. Contains 343177 sequences. (Running on oeis4.)