OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
select(p -> isprime(p) and numtheory:-order(2, p) = numtheory:-order(3, p), [seq(i, i=5..10000, 2)]); # Robert Israel, Jan 24 2024
PROG
(PARI) forprime(p=5, 10^3, if( znorder(Mod(2, p))==znorder(Mod(3, p)), print1(p, ", "); ) )
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Max Alekseyev, Jun 08 2011
STATUS
approved