A325385 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

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

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,6

LINKS

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

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));

CROSSREFS

Cf. A048250, A126795, A162296, A228058, A325313, A325314, A325375.

Sequence in context: A155824 A335505 A182429 * A195385 A319990 A138073

Adjacent sequences: A325382 A325383 A325384 * A325386 A325387 A325388

KEYWORD

nonn

AUTHOR

Antti Karttunen, Apr 24 2019

STATUS

approved