Search: id:A091399 Results 1-1 of 1 results found. %I A091399 %S A091399 1,2,2,2,0,4,1,2,2,0,0,4,0,2,0,2,0,4,2,0,2,0,0,4,0,0,2,2,2,0,2,2,0,0,0, %T A091399 4,2,4,0,0,0,4,0,0,0,0,2,4,1,0,0,0,2,4,0,2,4,4,2,0,0,4,2,2,0,0,0,0,0,0, %U A091399 0,4,0,4,0,4,0,0,0,0,2,0,2,4,0,0,4,0,0,0,0,0,4,4,0,4,0,2,0,0,0,0,2,0,0 %N A091399 Product_{ p | N } (1 + Legendre(7,p) ). %p A091399 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, 7),n=1..120)]; %Y A091399 Cf. A091379. %Y A091399 Sequence in context: A124759 A071295 A103223 this_sequence A000091 A155123 A125938 %Y A091399 Adjacent sequences: A091396 A091397 A091398 this_sequence A091400 A091401 A091402 %K A091399 nonn %O A091399 1,2 %A A091399 N. J. A. Sloane (njas(AT)research.att.com), Mar 02 2004 Search completed in 0.001 seconds