login
A279336
Permutation of natural numbers: a(1) = 1; for n > 1, if A079559(n) = 0, a(n) = 2*A234016(n), otherwise a(n) = A003961(a(A213714(n))).
4
1, 2, 3, 5, 4, 6, 7, 9, 8, 15, 11, 10, 12, 14, 25, 27, 16, 35, 13, 18, 20, 21, 45, 22, 33, 49, 24, 26, 28, 30, 125, 81, 32, 77, 17, 34, 36, 75, 63, 38, 55, 175, 40, 42, 44, 39, 65, 46, 121, 135, 48, 50, 51, 99, 52, 105, 343, 54, 56, 58, 60, 62, 625, 243, 64, 143, 19, 66, 68, 57, 225, 70, 245, 275, 72, 74, 76, 69, 91, 78, 539, 189, 80
OFFSET
1,2
COMMENTS
For n > 1, a(n) = the number which is in the same position of array A246278 where n is located in array A256997.
FORMULA
a(1) = 1, for n > 1, if A079559(n) = 0 [when n is a term of A055938], a(n) = 2*A234016(n), otherwise a(n) = A003961(a(A213714(n))).
Other identities:
For all n >= 2, a(n) = A246278(A256998(n)).
PROG
(Scheme)
(definec (A279336 n) (cond ((= 1 n) n) ((zero? (A079559 n)) (* 2 (A234016 n))) (else (A003961 (A279336 (A213714 n))))))
CROSSREFS
Inverse permutation: A279337.
Cf. also A278501, A279338 (a variant).
Sequence in context: A257677 A105363 A279337 * A275375 A225047 A279338
KEYWORD
nonn
AUTHOR
Antti Karttunen, Dec 10 2016
STATUS
approved