Search: id:A094896 Results 1-1 of 1 results found. %I A094896 %S A094896 0,0,0,13,0,0,0,0,0,37,0,0,0,53,0,61,0,0,73,0,0,0,89,0,97,0,0,109,113, 0, %T A094896 0,0,0,0,0,0,0,0,0,157,0,0,0,173,0,181,0,0,193,0,0,0,0,0,0,0,0,229,233, %U A094896 0,241,0,0,0,257,0,0,0,0,277,0,0,0,293,0,0,0,0,313,317,0,0,0,0,337,0,0 %N A094896 a(n) = if 4*n+1 is prime and 4*n+3 is not prime then 4*n+1 %t A094896 a=Table[If[PrimeQ[4*n+1]==True&&PrimeQ[4*n+3]==False, 4*n+1, 0], {n, 0, 200}] %Y A094896 Sequence in context: A165970 A081357 A127708 this_sequence A067155 A073867 A114782 %Y A094896 Adjacent sequences: A094893 A094894 A094895 this_sequence A094897 A094898 A094899 %K A094896 nonn %O A094896 0,4 %A A094896 Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jun 14 2004 Search completed in 0.001 seconds