A156328 List of prime pairs of the form (p, p+18).
5, 23, 11, 29, 13, 31, 19, 37, 23, 41, 29, 47, 41, 59, 43, 61, 53, 71, 61, 79, 71, 89, 79, 97, 83, 101, 89, 107, 109, 127, 113, 131, 131, 149, 139, 157, 149, 167, 163, 181, 173, 191, 179, 197, 181, 199, 193, 211, 211, 229, 223, 241, 233, 251, 239, 257, 251, 269, 263
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A153418.
Programs
-
Mathematica
Flatten[Select[{#, # + 18} &/@Prime[Range[1000]], PrimeQ[Last[#]]&]] (* Vincenzo Librandi, Nov 01 2012 *)
Comments