A003572 - OEIS

%I #16 Oct 22 2023 16:20:30

%S 1,4,2,5,6,16,4,11,3,28,8,12,18,8,10,23,20,52,6,29,30,12,16,35,18,30,

%T 4,41,42,88,22,36,42,100,6,53,20,112,28,48,10,100,32,65,22,136,12,15,

%U 12,148,18,60,78,66,8,83,16,172

%N Order of 3 mod 3n+2.

%H Jinyuan Wang, <a href="/A003572/b003572.txt">Table of n, a(n) for n = 0..10000</a>

%p with(numtheory): f := n->order(3,3*n+2);

%t Table[MultiplicativeOrder[3, 3*n + 2], {n, 0, 57}] (* _Jinyuan Wang_, Feb 16 2019 *)

%o (PARI) a(n) = znorder(Mod(3, 3*n+2)); \\ _Michel Marcus_, Feb 16 2019

%o (GAP) List([0..60],n->OrderMod(3,3*n+2)); # _Muniru A Asiru_, Feb 16 2019

%Y Cf. A002326, A003571, A003574, A217852.

%K nonn

%O 0,2

%A _N. J. A. Sloane_