A050975 Haupt-exponents of 3 modulo integers relatively prime to 3.

1, 2, 4, 6, 2, 4, 5, 3, 6, 4, 16, 18, 4, 5, 11, 20, 3, 6, 28, 30, 8, 16, 12, 18, 18, 4, 8, 42, 10, 11, 23, 42, 20, 6, 52, 20, 6, 28, 29, 10, 30, 16, 12, 22, 16, 12, 35, 12, 18, 18, 30, 78, 4, 8, 41, 16, 42, 10, 88, 6, 22, 23, 36, 48, 42, 20, 100, 34, 6, 52, 53, 27, 20, 12

Offset: 1

Author

Eric W. Weisstein

Keywords

• nonn

Links

• R. J. Mathar, Table of n, a(n) for n = 1..1000
• Eric Weisstein's World of Mathematics, Multiplicative Order

Crossrefs

Cf. A002326, A002329, A053446.

Programs

Maple

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