OFFSET
1,1
COMMENTS
LINKS
Jianing Song, Table of n, a(n) for n = 1..10001
Max Alekseyev, PARI/GP Scripts for Miscellaneous Math Problems (invphi.gp).
Wikipedia, Multiplicative group of integers modulo n.
EXAMPLE
12 is a term: if there exists m such that (Z/mZ)* = C_2 X C_24 = C_2 X C_8 X C_3, then m must have a factor q such that q is an odd prime power and phi(q) = 8 or phi(q) = 24, phi = A000010, which is impossible.
80 is a term: if there exists m such that (Z/mZ)* = C_2 X C_80 = C_2 X C_16 X C_5, then m must have a factor q such that q is an odd prime power and phi(q) = 80 or phi(q) = 16, which is impossible.
PROG
(PARI) isA328414(n) = my(r=4*n, N=floor(exp(Euler)*r*log(log(r^2))+2.5*r/log(log(r^2)))); for(k=r+1, N+1, if(eulerphi(k)==r && lcm(znstar(k)[2])==r/2, return(0)); if(k==N+1, return(1)))
for(n=1, 200, if(isA328414(n), print1(n, ", ")))
(PARI) isA328414(n) = (#select(x->znstar(x)[2]==[2*n, 2], invphi(4*n)) == 0) \\ Jianing Song, Apr 08 2026 using Max Alekseyev's invphi.gp
CROSSREFS
KEYWORD
nonn
AUTHOR
Jianing Song, Oct 14 2019
STATUS
approved
