|
|
A292572
|
|
Lucas-Carmichael numbers whose Dedekind psi value is a cube.
|
|
3
|
|
|
8855, 31535, 73535, 265895, 12676799, 30071327, 86450399, 561645839, 674628479, 741722399, 945066527, 1066699799, 1304305415, 2239506719, 2423951999, 2693338559, 3512071871, 4708417055, 4811496767, 8194093919, 9140299199, 9184665599, 9405512639, 11729537855
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
psi(8855) = 24^3.
|
|
MATHEMATICA
|
psi[n_] := If[n < 1, 0, n*Sum[MoebiusMu[d]^2/d, {d, Divisors@n}]]; s = Import["b006972.txt", "Data"][[All, -1]]; Select[s, IntegerQ@Power[psi@#, 1/3] &]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|