%I A128829
%S A128829 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,20,21,23,25,26,27,28,30,31,33,
%T A128829 36,37,38,41,42,44,46,48,49,50,53,58,59,60,61,62,63,64,65,66,67,72,73,
%U A128829 75,76,77,79,81,82,83,89,95,96,98,100,101,103,106,107,108,110,111,113
%N A128829 Numbers n such that 6*n^2 + 17 is prime.
%e A128829 6*8^2 + 17 = 401 is prime, hence 8 is a term.
%p A128829 a:=proc(n) if isprime(6*n^2+17)=true then n else fi end: seq(a(n),n=0..150);
- Emeric Deutsch (deutsch(AT)duke.poly.edu), Apr 16 2007
%t A128829 f[a_]:=6*a^2+17; lst={};Do[If[PrimeQ[f[n]],AppendTo[lst,n]],{n,0,5!}];
lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jul 14 2009]
%o A128829 (MAGMA) [ n: n in [0..113] | IsPrime(6*n^2+17) ]; /* Klaus Brockhaus,
Apr 16 2007 */
%Y A128829 Sequence in context: A017909 A124695 A005555 this_sequence A023770 A023797
A032951
%Y A128829 Adjacent sequences: A128826 A128827 A128828 this_sequence A128830 A128831
A128832
%K A128829 nonn,less
%O A128829 1,3
%A A128829 J. M. Bergot (thekingfishb(AT)yahoo.ca), Apr 13 2007
%E A128829 Edited and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de)
and Emeric Deutsch (deutsch(AT)duke.poly.edu), Apr 16 2007
|