login
A279337
a(1) = 1, for n > 1, if n is even, a(n) = A055938(n/2), otherwise a(n) = A005187(a(A064989(n))).
3
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.
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. also A279339 (a variant).
Sequence in context: A257676 A257677 A105363 * A279336 A275375 A225047
KEYWORD
nonn
AUTHOR
Antti Karttunen, Dec 10 2016
STATUS
approved