Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A132666
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A132666 a(1)=1, a(n)=2*a(n-1) if the minimal natural number not encountered so far is greater than a(n-1), else a(n)=a(n-1)-1. +0
20
1, 2, 4, 3, 6, 5, 10, 9, 8, 7, 14, 13, 12, 11, 22, 21, 20, 19, 18, 17, 16, 15, 30, 29, 28, 27, 26, 25, 24, 23, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 62, 61, 60, 59, 58, 57, 56, 55, 54, 53, 52, 51, 50, 49, 48, 47, 94, 93, 92, 91, 90, 89, 88, 87, 86, 85 (list; graph; listen)
OFFSET

1,2

COMMENT

Also: a(1)=1, a(n)=maximal positive number <a(n-1) not encountered so far, if existing, else a(n)=2*a(n-1).

Also: a(1)=1, a(n)=a(n-1)-1, if a(n-1)-1>0 and has not been encountered so far, else a(n)=2*a(n-1).

A reordering of the natural numbers. The sequence is self-inverse in that a(a(n))=n.

Almost certainly a duplicate of A132340. - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jun 12 2008

FORMULA

G.f.: g(x)=(x(1-2x)/(1-x)+2x^2*f'(x^3)+3/4*(f'(x)-2x-1))/(1-x) where f(x)=sum{k>=0, x^(2^k)} and f'(z)=derivative of f(x) at x=z.

a(n)=5*2^(r/2)-3-n, if both r and s are even, else a(n)=7*2^((s-1)/2)-3-n, where r=ceiling(2*log_2((n+2)/3)) and s=ceiling(2*log_2((n+2)/2)-1).

a(n)=2^floor(1+(k+1)/2)+3*2^floor(k/2)-3-n, where k=r, if r is even, else k=s (with respect to r and s above; formally, k=((r+s)+(r-s)*(-1)^r)/2).

a(n)=A027383(m)+A027383(m+1)+1-n, where m:=max{ k | A027383(k)<n }.

a(A027383(n)+1)=A027383(n+1).

a(A027383(n))=A027383(n-1)+1 for n>0.

CROSSREFS

For formulae concerning a general parameter p (with respect to the recurrence rule ... a(n)=p*a(n-1) ...) see A132374.

For p=3 to p=10 see A132667-132674.

For a similar recurrence rule concerning Fibonacci (A000045) and Lucas numbers (A000032) see A132664 and A132665.

Cf. A027383.

Sequence in context: A034701 A091857 A132340 this_sequence A116533 A087559 A091850

Adjacent sequences: A132663 A132664 A132665 this_sequence A132667 A132668 A132669

KEYWORD

nonn,nice

AUTHOR

Hieronymus Fischer (Hieronymus.Fischer(AT)gmx.de), Aug 24 2007, Sep 15 2007

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified August 29 17:54 EDT 2008. Contains 143238 sequences.


AT&T Labs Research