Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A324182
a(n) = A083254(A163511(n)), where A083254(n) = 2*phi(n) - n, the Möbius transform of the deficiency of n.
5
1, 0, 0, 1, 0, 3, -2, 3, 0, 9, -6, 15, -4, 1, -2, 5, 0, 27, -18, 75, -12, 5, -10, 35, -8, 3, -14, 13, -4, 3, -2, 9, 0, 81, -54, 375, -36, 25, -50, 245, -24, 15, -70, 91, -20, 21, -14, 99, -16, 9, -42, 65, -28, -9, -22, 43, -8, 9, -18, 25, -4, 7, -2, 11, 0, 243, -162, 1875, -108, 125, -250, 1715, -72, 75, -350, 637, -100, 147, -98, 1089
OFFSET
0,6
FORMULA
a(n) = A083254(A163511(n)).
For n > 0, a(n) = A324052(A054429(n)).
PROG
(PARI)
A163511(n) = if(!n, 1, my(p=2, t=1); while(n>1, if(!(n%2), (t*=p), p=nextprime(1+p)); n >>= 1); (t*p));
A083254(n) = (2*eulerphi(n)-n);
CROSSREFS
Cf. A054429, A083254, A163511, A324052, A324183, A324184, A324185 (compare the scatter plot), A366804 (rgs-transform).
Cf. also A324103.
Sequence in context: A244996 A086099 A048967 * A166592 A103497 A191390
KEYWORD
sign,look
AUTHOR
Antti Karttunen, Feb 18 2019
STATUS
approved