A153152 - OEIS

This site is supported by donations to The OEIS Foundation.

A153152

Rotated binary incrementing: For n<2 a(n)=n, if n=(2^k)-1, a(n)=(n+1)/2, otherwise a(n)=n+1.

0, 1, 3, 2, 5, 6, 7, 4, 9, 10, 11, 12, 13, 14, 15, 8, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 16, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 32, 65, 66, 67, 68, 69, 70, 71, 72 (list; graph; refs; listen; history; internal format)

	OFFSET	`0,3`
	LINKS	`A. Karttunen, Table of n, a(n) for n = 0..2047` `Index entries for sequences that are permutations of the natural numbers`
	PROG	`(MIT Scheme:) (define (A153152 n) (cond ((< n 2) n) ((pow2? (1+ n)) (/ (1+ n) 2)) (else (1+ n))))` `(define (pow2? n) (and (> n 0) (zero? (A004198bi n (- n 1)))))`
	CROSSREFS	`Inverse: A153151. a(n) = A059893(A153142(A059893(n))) = A059894(A153141(A059894(n))).` `Sequence in context: A120912 A057028 A195112 * A153153 A175058 A154437` `Adjacent sequences: A153149 A153150 A153151 * A153153 A153154 A153155`
	KEYWORD	`nonn,base`
	AUTHOR	`Antti Karttunen (His-Firstname.His-Surname(AT)gmail.com), Dec 20 2008`

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

Last modified February 16 09:00 EST 2012. Contains 205904 sequences.