OFFSET
1,2
LINKS
R. J. Mathar, Table of n, a(n) for n = 1..1000
Eric Weisstein's World of Mathematics, Multiplicative Order
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
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved