login
A231565
Numbers such that A231563(n)>0.
3
2, 4, 6, 8, 12, 16, 18, 20, 24, 30, 32, 36, 40, 42, 48, 54, 60, 64, 66, 72, 80, 84, 90, 96, 100, 102, 108, 110, 120, 126, 128, 132, 138, 140, 144, 150, 156, 160, 162, 168, 174, 180, 192, 198, 200, 204, 210, 216, 220, 240, 246, 252, 256, 260, 264, 270, 272
OFFSET
1,1
MATHEMATICA
S[n_] := Mod[Sum[If[GCD[i, n] == 1, PowerMod[i, n, n], 0], {i, 1, n}], n]; Select[Range[1200], ! S[#] == 0 &]
CROSSREFS
Sequence in context: A325795 A359420 A325781 * A191743 A308115 A331828
KEYWORD
nonn
AUTHOR
STATUS
approved