Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A325385
a(n) = gcd(n-A048250(n), n-A162296(n)).
18
1, 1, 1, 1, 1, 6, 1, 1, 5, 2, 1, 4, 1, 2, 3, 1, 1, 3, 1, 2, 1, 2, 1, 12, 19, 2, 1, 4, 1, 6, 1, 1, 3, 2, 1, 1, 1, 2, 1, 2, 1, 6, 1, 4, 3, 2, 1, 4, 41, 1, 3, 2, 1, 6, 1, 8, 1, 2, 1, 12, 1, 2, 1, 1, 1, 6, 1, 2, 3, 2, 1, 3, 1, 2, 1, 4, 1, 6, 1, 2, 1, 2, 1, 4, 1, 2, 3, 4, 1, 18, 7, 4, 1, 2, 5, 12, 1, 1, 3, 1, 1, 6, 1, 2, 3
OFFSET
1,6
LINKS
FORMULA
a(n) = gcd(n-A048250(n), n-A162296(n)).
a(n) = gcd(A325313(n), A325314(n)).
a(A228058(n)) = A325375(n).
PROG
(PARI)
A048250(n) = factorback(apply(p -> p+1, factor(n)[, 1]));
A162296(n) = sumdiv(n, d, d*(1-issquarefree(d)));
A325385(n) = gcd(n-A048250(n), n-A162296(n));
KEYWORD
nonn
AUTHOR
Antti Karttunen, Apr 24 2019
STATUS
approved