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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A118471 a(0)=1. a(n) = a(n-1)*(n+1), if n is in the sequence. a(n)= a(n-1) +1, if n is missing from the sequence. 0
1, 2, 6, 7, 8, 9, 63, 504, 4536, 45360, 45361, 45362, 45363, 45364, 45365, 45366, 45367, 45368, 45369, 45370, 45371, 45372, 45373, 45374, 45375, 45376, 45377, 45378, 45379, 45380, 45381, 45382, 45383, 45384, 45385, 45386, 45387, 45388 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

Table of n, a(n) for n=0..37.

MATHEMATICA

f[s_] := Block[{n = Length@s}, Append[s, If[MemberQ[s, n], s[[ -1]](n + 1), s[[ -1]] + 1]]]; Nest[f, {1}, 40] (from Robert G. Wilson v, May 16 2006)

CROSSREFS

Sequence in context: A138168 A047279 A162917 * A167456 A023633 A028735

Adjacent sequences:  A118468 A118469 A118470 * A118472 A118473 A118474

KEYWORD

easy,nonn

AUTHOR

Leroy Quet, May 04 2006

STATUS

approved

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

Content is available under The OEIS End-User License Agreement .

Last modified October 23 17:11 EDT 2014. Contains 248468 sequences.