|
| |
|
|
A091396
|
|
Product_{ p | N } (1 + Legendre(2,p) ).
|
|
0
| |
|
|
1, 1, 0, 1, 0, 0, 2, 1, 0, 0, 0, 0, 0, 2, 0, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 2, 0, 0, 2, 1, 0, 2, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 2, 2, 0, 2, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 2, 0, 1, 0, 0, 0, 2, 0, 0, 2, 0, 2, 0, 0, 0, 0, 0, 2, 0, 0, 2, 0, 0, 0, 0, 0, 0, 2, 0, 0, 2, 0, 2, 0, 0, 2, 2, 0, 0, 0, 0, 2, 0, 0
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,7
|
|
|
FORMULA
| Multiplicative with a(2^e)=1, a(p^e)=0 if p mod 8=3 or p mod 8=5 and a(p^e)=2 if p mod 8=1 or p mod 8=7. - Vladeta Jovovic (vladeta(AT)eunet.rs), Mar 02 2004
|
|
|
MAPLE
| with(numtheory); L := proc(n, N) local i, t1, t2; t1 := ifactors(n)[2]; t2 := mul((1+legendre(N, t1[i][1])), i=1..nops(t1)); end; [seq(L(n, 2), n=1..120)];
|
|
|
CROSSREFS
| Cf. A091379.
Sequence in context: A017867 A127843 A154234 * A173677 A037857 A037875
Adjacent sequences: A091393 A091394 A091395 * A091397 A091398 A091399
|
|
|
KEYWORD
| nonn,mult
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Mar 02 2004
|
| |
|
|
