OFFSET
1,1
LINKS
Roger L. Bagula, Table of n, a(n) for n = 1..130
C. K. Caldwell, The Prime Pages.
C. K. Caldwell, Twin Primes.
MATHEMATICA
a[0] = 7; a[n_] := a[n] = a[n - 1] + 10; Flatten[Table[If[PrimeQ[a[n]] && PrimeQ[a[n] + 2], {a[n], a[n] + 2}, {}], {n, 0, 1000}]] (* Roger L. Bagula, May 04 2008 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, Aug 15 2007
EXTENSIONS
More terms from Roger L. Bagula, May 04 2008
STATUS
approved