A369053 Exponential of Mangoldt function permuted by A243353.

1, 2, 2, 3, 3, 2, 1, 5, 5, 1, 2, 3, 1, 1, 1, 7, 7, 1, 1, 1, 3, 2, 1, 5, 1, 1, 1, 1, 1, 1, 1, 11, 11, 1, 1, 1, 1, 1, 1, 1, 5, 1, 2, 3, 1, 1, 1, 7, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 13, 13, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 7, 1, 1, 1, 3, 2, 1, 5, 1, 1, 1, 1, 1, 1, 1, 11, 1, 1, 1, 1, 1, 1, 1, 1, 1

Offset

0,2

Comments

Also LCM-transform of A243353 (when viewed as an offset-1 sequence), because A243353 has the S-property explained in the comments of A368900.

Links

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

Index entries for sequences related to binary expansion of n

Formula

a(n) = A014963(A243353(n)).

a(0) = 1, and for n > 0, a(n) = lcm {1..A243353(n)} / lcm {1..A243353(n-1)}. [See comments]

Prog

(PARI)
A014963(n) = { ispower(n, , &n); if(isprime(n), n, 1); };
A003188(n) = bitxor(n, n>>1);
A005940(n) = { my(p=2, t=1); n--; until(!n\=2, if((n%2), (t*=p), p=nextprime(p+1))); (t); };
A243353(n) = A005940(1+A003188(n));
A369053(n) = A014963(A243353(n));

Crossrefs

Cf. A003188, A014963, A243353, A368900, A369028, A369029, A369030.

Sequence in context: A340488 A339456 A220517 * A340328 A271076 A087175

Adjacent sequences: A369050 A369051 A369052 * A369054 A369055 A369056

Keyword

nonn

Author

Antti Karttunen, Jan 12 2024

Status

approved