A133069 Successive digits of twin primes A001097.
3, 5, 7, 1, 1, 1, 3, 1, 7, 1, 9, 2, 9, 3, 1, 4, 1, 4, 3, 5, 9, 6, 1, 7, 1, 7, 3, 1, 0, 1, 1, 0, 3, 1, 0, 7, 1, 0, 9, 1, 3, 7, 1, 3, 9, 1, 4, 9, 1, 5, 1, 1, 7, 9, 1, 8, 1, 1, 9, 1, 1, 9, 3, 1, 9, 7, 1, 9, 9, 2, 2, 7, 2, 2, 9, 2, 3, 9, 2, 4, 1, 2, 6, 9, 2, 7, 1, 2, 8, 1, 2, 8, 3, 3, 1, 1, 3, 1, 3
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..5000
- Omar E. Pol, Determinacion geometrica de los numeros primos y perfectos.
Programs
-
Mathematica
Flatten[IntegerDigits/@Union[Flatten[Select[Partition[Prime[ Range[ 100]],2,1], Last[#]- First[#] == 2&]]]] (* Harvey P. Dale, May 29 2014 *)
Comments