login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A250404
Numbers k such that the set of all distinct values of phi of all divisors of k equals the set of all proper divisors of k+1 where phi is the Euler totient function (A000010).
1
1, 2, 3, 15, 255, 65535, 4294967295
OFFSET
1,2
COMMENTS
Numbers k such that {phi(d) : d|k} = {d : d|(k+1), d<(k+1)} as sets.
Conjecture: last term is 4294967295.
Sequence differs from A203966 because 83623935 is not in this sequence.
EXAMPLE
2 is a term since {phi(d) : d|2} = {1} = {d; d|2, d<2}.
15 is a term since {phi(d) : d|15} = {1, 2, 4, 8} = {d : d|16, d<16}.
PROG
(Magma) [n: n in [1..100000] | Set([EulerPhi(d): d in Divisors(n)]) eq Set([d: d in Divisors(n+1) | d lt n+1 ])]
(PARI) isok(n) = {sphi = []; fordiv(n, d, sphi = Set(concat(sphi, eulerphi(d)))); sphi == setminus(Set(divisors(n+1)), Set(n+1)); } \\ Michel Marcus, Nov 23 2014
CROSSREFS
Subsequence of A203966.
Sequence in context: A162100 A330871 A203966 * A167444 A292709 A097655
KEYWORD
nonn,more,hard
AUTHOR
Jaroslav Krizek, Nov 22 2014
EXTENSIONS
Edited and a(7) added by Max Alekseyev, May 04 2024
STATUS
approved