A279337 a(1) = 1, for n > 1, if n is even, a(n) = A055938(n/2), otherwise a(n) = A005187(a(A064989(n))).

1, 2, 3, 5, 4, 6, 7, 9, 8, 12, 11, 13, 19, 14, 10, 17, 35, 20, 67, 21, 22, 24, 131, 27, 15, 28, 16, 29, 259, 30, 515, 33, 25, 36, 18, 37, 1027, 40, 46, 43, 2051, 44, 4099, 45, 23, 48, 8195, 51, 26, 52, 53, 55, 16387, 58, 41, 59, 70, 60, 32771, 61, 65539, 62, 39, 65, 47, 68, 131075, 69, 78, 72, 262147, 75, 524291, 76, 38, 77, 34, 80

Offset

1,2

Comments

For n > 1, a(n) = the number which is in the same position of array A256997 where n is located in array A246278.

Links

Antti Karttunen, Table of n, a(n) for n = 1..2048

Index entries for sequences that are permutations of the natural numbers

Formula

a(1) = 1; for n > 1, if n is even, a(n) = A055938(n/2), otherwise a(n) = A005187(a(A064989(n))).

Other identities: For all n >= 2, a(n) = A256997(A252752(n)).

Prog

(Scheme)
(definec (A279337 n) (cond ((= 1 n) n) ((even? n) (A055938 (/ n 2))) (else (A005187 (A279337 (A064989 n))))))

Crossrefs

Inverse: A279336.

Cf. A005187, A055938, A064989, A246278, A252752, A256997.

Cf. also A279339 (a variant).

Sequence in context: A257676 A257677 A105363 * A279336 A275375 A225047

Adjacent sequences: A279334 A279335 A279336 * A279338 A279339 A279340

Keyword

nonn

Author

Antti Karttunen, Dec 10 2016

Status

approved