OFFSET
1,2
LINKS
Jianing Song, Table of n, a(n) for n = 1..10000
MATHEMATICA
A385222[n_] := If[n == 1 || n == 3, 0, MultiplicativeOrder[-10, Prime[n]]];
Array[A385222, 100] (* Paolo Xausa, Jun 29 2025 *)
PROG
(PARI) a(n, {k=-10}) = my(p = prime(n)); if(k%p==0, 0, znorder(Mod(k, p)))
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jianing Song, Jun 27 2025
STATUS
approved
