OFFSET
1,1
COMMENTS
Prime p > 3 is in this sequence iff all prime factors of the multiplicative order of -3/4 modulo p belong to this sequence.
PROG
(PARI) S=[]; forprime(p=5, oo, f=Set(factor(znorder(Mod(-3/4, p)))[, 1]); if(#setintersect(S, f)==#f, S=setunion(S, [p]); print1(p, ", ")));
CROSSREFS
KEYWORD
nonn
AUTHOR
Max Alekseyev, May 15 2022
EXTENSIONS
a(18)-a(24) from Jinyuan Wang, Jan 29 2025
STATUS
approved
