A335422 a(n) = A005940(1+A163511(n)).

2, 3, 5, 4, 7, 10, 9, 6, 11, 36, 21, 50, 25, 16, 15, 8, 13, 154, 225, 486, 55, 84, 147, 98, 49, 90, 81, 28, 35, 30, 27, 12, 17, 2500, 429, 8918, 1225, 1080, 9375, 840, 91, 2662, 495, 3750, 605, 220, 363, 1250, 121, 88, 525, 240, 625, 490, 99, 126, 77, 64, 105, 72, 125, 22, 45, 18, 19, 26950, 21609, 43350, 1105, 186340, 67881

Offset

0,1

Comments

Permutation of natural numbers larger than one.

Links

Antti Karttunen, Table of n, a(n) for n = 0..16384

Index entries for sequences related to binary expansion of n

Formula

a(n) = A005940(1+A163511(n)).

For all n >= 0, a(2^n) = A000040(2+n).

A001222(a(n)) = A335420(n).

Prog

(PARI)
A005940(n) = { my(p=2, t=1); n--; until(!n\=2, if((n%2), (t*=p), p=nextprime(p+1))); t }; \\ From A005940
A054429(n) = ((3<<#binary(n\2))-n-1); \\ From A054429
A163511(n) = if(!n, 1, A005940(1+A054429(n)))
A335422(n) = A005940(1+A163511(n));

Crossrefs

Cf. A001222, A005940, A054429, A163511, A335420, A335421.

Sequence in context: A029654 A297769 A213921 * A214870 A347204 A114461

Adjacent sequences: A335419 A335420 A335421 * A335423 A335424 A335425

Keyword

nonn

Author

Antti Karttunen, Jun 09 2020

Status

approved