OFFSET
1,2
COMMENTS
Numbers k such that A362181(k) = 1.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..2335 (terms below 10^5)
EXAMPLE
0 is a term since there is only one solution, x = 1, to A323410(x) = 0.
MATHEMATICA
ucototient[n_] := n - Times @@ (Power @@@ FactorInteger[n] - 1); ucototient[1] = 0; With[{max = 300}, solnum = Table[0, {n, 1, max}]; Do[If[(i = ucototient[k]) <= max, solnum[[i]]++], {k, 2, max^2}]; Join[{0}, Position[solnum, 1] // Flatten]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Apr 10 2023
STATUS
approved