0,1

Using quadratic class fields to produce quadratic like primes these numbers are gap like: Prime[n+1=Prime[n]+a[n] Hendy Polynomials of the type: p[x]=(a[n]-1)*x^2+(a[n]-1)*x+Prime[m] with recursions of: F[n]=F[n-1]+a[n]; F[0]=Prime[m]

a(n) = If[Mod[A003173[n]+1,2]==0,A003173[n]+1 else 2*(A003173[n]+1)]

h = {1, 2, 3, 7, 11, 19, 43, 67, 163} a = Union[Table[If[Mod[h[[n]] + 1, 2] == 0, h[[n]] + 1, 2*(h[[n]] + 1)], {n, 1, Length[h]}]]

Cf. A003173.

Sequence in context: A050597 A057335 A126907 this_sequence A164145 A140999 A001217

Adjacent sequences: A118560 A118561 A118562 this_sequence A118564 A118565 A118566

nonn,uned

Roger Bagula (rlbagulatftn(AT)yahoo.com), May 03 2006