OFFSET
1,1
COMMENTS
LINKS
Jianing Song, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Prime[Range[200]], OddQ[MultiplicativeOrder[-5, #]] &] (* Paolo Xausa, Jun 28 2025 *)
PROG
(PARI) isA385225(p) = isprime(p) && (p!=5) && znorder(Mod(-5, p))%2
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jianing Song, Jun 22 2025
STATUS
approved
