OFFSET
1,2
COMMENTS
Numbers k that divide A074533(k)+1. - Michel Marcus, Oct 30 2025
MATHEMATICA
Select[ Range[ 10^6 ], Mod[ PowerMod[ 6, #, # ] + PowerMod[ 4, #, # ] + PowerMod[ 2, #, # ] + 1, # ] == 0 & ]
PROG
(PARI) isok(n) = Mod(6, n)^n + Mod(4, n)^n + Mod(2, n)^n == -1 \\ Andrew Howroyd, Oct 30 2025
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Robert G. Wilson v, Nov 09 2000
EXTENSIONS
a(6)-a(8) from Andrew Howroyd, Oct 30 2025
STATUS
approved
