|
| |
|
|
A091338
|
|
a(n) = (3/n), where (k/n) is the Kronecker symbol.
|
|
2
| |
|
|
1, -1, 0, 1, -1, 0, -1, -1, 0, 1, 1, 0, 1, 1, 0, 1, -1, 0, -1, -1, 0, -1, 1, 0, 1, -1, 0, -1, -1, 0, -1, -1, 0, 1, 1, 0, 1, 1, 0, 1, -1, 0, -1, 1, 0, -1, 1, 0, 1, -1, 0, 1, -1, 0, -1, 1, 0, 1, 1, 0, 1, 1, 0, 1, -1, 0, -1, -1, 0, -1, 1, 0, 1, -1, 0, -1, -1, 0, -1, -1, 0, 1, 1, 0, 1, 1, 0, -1, -1, 0, -1, 1, 0, -1, 1, 0, 1, -1, 0, 1, -1, 0
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Kronecker Symbol
|
|
|
FORMULA
| If n==0 (mod 3) a(n)=0; for p ==1 or 11 (mod 12) (i.e. p>3 in A038874), a(p)=+1; for p==2, 5 or 7 (mod 12) (i.e. p in A038875), a(p)=-1 - Benoit Cloitre (benoit7848c(AT)orange.fr), Jan 03 2004
|
|
|
MAPLE
| A091338 := proc(n)
numtheory[jacobi](3, n) ;
end proc: # R. J. Mathar, Nov 03 2011
|
|
|
PROG
| (PARI) a(n)=kronecker(3, n)
|
|
|
CROSSREFS
| Sequence in context: A117441 A049347 A010892 * A016345 A016148 A016333
Adjacent sequences: A091335 A091336 A091337 * A091339 A091340 A091341
|
|
|
KEYWORD
| sign,mult
|
|
|
AUTHOR
| Eric Weisstein (eric(AT)weisstein.com), Dec 30, 2003
|
|
|
EXTENSIONS
| More terms from Benoit Cloitre (benoit7848c(AT)orange.fr), Jan 03 2004
|
| |
|
|