

A245820


Permutation of natural numbers induced when A245704 is restricted to {1} and binary codes for polynomials reducible over GF(2): a(1) = 1, a(n) = A062298(A245704(A091242(n1))).


4



1, 2, 3, 4, 5, 7, 9, 6, 10, 13, 16, 8, 11, 14, 17, 22, 26, 15, 19, 20, 23, 27, 34, 39, 25, 12, 29, 31, 35, 40, 50, 24, 56, 37, 21, 43, 46, 38, 51, 57, 70, 48, 36, 78, 53, 33, 61, 18, 65, 55, 71, 79, 95, 67, 52, 30, 106, 75, 49, 42, 85, 54, 28, 89, 77, 96, 107, 74, 126, 92, 73, 45, 141, 98, 101, 69, 59, 116, 76, 41, 120, 105
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


LINKS

Antti Karttunen, Table of n, a(n) for n = 1..10001
Index entries for sequences that are permutations of the natural numbers


FORMULA

a(1) = 1, and for n > 1, a(n) = 1 + A245704(n1).
a(1) = 1, and for n > 1, a(n) = A062298(A245704(A091242(n1))). [Induced when A245704 is restricted to {1} and binary codes for polynomials reducible over GF(2)].
a(1) = 1, and for n > 1, a(n) = A036234(A245704(A014580(n1))). [Induced also when A245703 is restricted to {1} and other binary codes for polynomials not reducible over GF(2)].
As a composition of related permutations:
a(n) = A245816(A245813(n)).


PROG

(PARI)
A245820(n) = if(1==n, 1, 1 + A245704(n1));
for(n=1, 10001, write("b245820.txt", n, " ", A245820(n))); \\ The rest of code can be found in A245704.
(Scheme, three different implementations)
(define (A245820 n) (if (<= n 1) n (+ 1 (A245704 ( n 1)))))
(define (A245820 n) (if (<= n 1) n (A062298 (A245704 (A091242 ( n 1))))))
(define (A245820 n) (if (<= n 1) n (A036234 (A245704 (A014580 ( n 1))))))


CROSSREFS

Inverse: A245819.
Related permutations: A245704, A245813, A245816.
Cf. A014580, A036234, A062298, A091242.
Sequence in context: A029447 A212317 A161751 * A105362 A115928 A247665
Adjacent sequences: A245817 A245818 A245819 * A245821 A245822 A245823


KEYWORD

nonn


AUTHOR

Antti Karttunen, Aug 16 2014


STATUS

approved



