1,2

R. J. Mathar, Table of n, a(n) for n = 1..1000

Eric Weisstein's World of Mathematics, Multiplicative Order

A001651 := proc(n)

(3*(2*n-1)-(-1)^n)/4 ;

end proc:

A050975 := proc(n)

local gcd3 ;

gcd3 := A001651(n+1);

numtheory[order](3, gcd3) ;

end proc: # R. J. Mathar, Oct 21 2012

Cf. A002326, A002329.

Sequence in context: A056649 A075242 A161489 * A053446 A133903 A278263

Adjacent sequences: A050972 A050973 A050974 * A050976 A050977 A050978

nonn

Eric W. Weisstein

approved