login
A336566
a(n) = gcd(A336563(n), A336564(n)) = gcd(A057723(n)-n, n-A308135(n));
6
1, 1, 2, 1, 4, 0, 6, 1, 1, 2, 10, 2, 12, 4, 6, 1, 16, 3, 18, 2, 10, 8, 22, 6, 1, 10, 2, 14, 28, 12, 30, 1, 18, 14, 22, 1, 36, 16, 22, 10, 40, 12, 42, 2, 3, 20, 46, 14, 1, 1, 30, 2, 52, 12, 38, 2, 34, 26, 58, 6, 60, 28, 1, 1, 46, 12, 66, 2, 42, 4, 70, 3, 72, 34, 1, 2, 58, 12, 78, 2, 1, 38, 82, 14, 62, 40, 54, 2, 88
OFFSET
1,3
LINKS
FORMULA
a(n) = gcd(A336563(n), A336564(n)) = gcd(A057723(n)-n, n-A308135(n));
PROG
(PARI)
A007947(n) = factorback(factorint(n)[, 1]);
A057723(n) = { my(r=A007947(n)); (r*sigma(n/r)); };
A308135(n) = (sigma(n)-A057723(n));
A336563(n) = (A057723(n)-n);
A336564(n) = (n - A308135(n));
A336566(n) = gcd(A336563(n), A336564(n));
CROSSREFS
Differs from A326144 at the positions given by A336555, for the first time at n=45, where a(45) = 3, while A326144(45) = 6.
Sequence in context: A282886 A282846 A326129 * A326144 A120112 A233150
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 27 2020
STATUS
approved