A325963 Numbers n for which A034448(n)-n is equal to n-A048250(n).

1, 4, 24, 240, 349440

Offset

1,2

Comments

No other terms below 536870912 (2^29).

a(6) > 10^12, if it exists. - Giovanni Resta, Jun 07 2019

Links

Table of n, a(n) for n=1..5.

Prog

(PARI)
A034448(n) = { my(f=factorint(n)); prod(k=1, #f~, 1+(f[k, 1]^f[k, 2])); };
A048250(n) = factorback(apply(p -> p+1, factor(n)[, 1]));
isA325963(n) = ((A034448(n)-n) == (n-A048250(n)));

Crossrefs

Cf. A034448, A048250, A034460, A325313.

Positions of zeros in A325977.

Sequence in context: A061640 A126391 A006088 * A141013 A330469 A227467

Adjacent sequences: A325960 A325961 A325962 * A325964 A325965 A325966

Keyword

nonn,more

Author

Antti Karttunen, Jun 04 2019

Status

approved