A063502 a(n+1) = p, where p is the a(n)-th twin prime (p,p+2), with a(0) = 1.
1, 3, 11, 137, 5639, 641129, 152921807, 65818751039, 46091763604421
Offset: 0
Examples
a(3) = 137 because a(2) = 11 and the 11th twin prime is (137,139).
Links
- Tomás Oliveira e Silva, Tables of values of pi(x) and of pi2(x) [From _M. F. Hasler_, Mar 02 2009]
Crossrefs
Cf. A007097.
Programs
-
Mathematica
(* Computes up to a(6) only *) tp[n_] := (* = A001359 *) tp[n] = (p = NextPrime[tp[n-1]]; While[ !PrimeQ[p+2], p = NextPrime[p]]; p); tp[1] = 3; Do[tp[n], {n, 2, 10^6}]; a[n_] := a[n] = tp[a[n-1]]; a[0]=1; Table[ Print[ a[n]]; a[n], {n, 0, 6}] (* Jean-François Alcover, Dec 13 2011 *)
Formula
a(n+1) = A001359(a(n)); a(0)=1. [M. F. Hasler, Mar 02 2009]
Extensions
Edited by Frank Ellermann, Jan 25 2002
Offset and example corrected by Farideh Firoozbakht, Dec 07 2008
a(7) = 65818751039 from Zak Seidov and Farideh Firoozbakht, Dec 13 2008
Computed a(8)=46091763604421 using data from T. Oliveira e Silva. - M. F. Hasler, Mar 02 2009
Comments