A140445 List of prime pairs of form p, p + 10.
3, 13, 7, 17, 13, 23, 19, 29, 31, 41, 37, 47, 43, 53, 61, 71, 73, 83, 79, 89, 97, 107, 103, 113, 127, 137, 139, 149, 157, 167, 163, 173, 181, 191, 223, 233, 229, 239, 241, 251, 271, 281, 283, 293, 307, 317, 337, 347, 349, 359, 373, 383, 379, 389, 409, 419, 421
Offset: 1
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Maple
i: 1: for k from 1 to 1200 do if isprim (k) and isprim (k+10) then a [ i ] : = k : a [ i + 1]: = k + 10 : i = i + 2 fi od : seq (a [ n ], n=1..i-1);
-
Mathematica
Flatten[{#,#+10}&/@Select[Prime[Range[100]],PrimeQ[#+10]&]] (* Harvey P. Dale, Apr 11 2011 *)
Extensions
Corrected by D. S. McNeil, Dec 10 2009