A055784 Primes q of form q = 10p + 9, where p is also prime.
29, 59, 79, 139, 179, 199, 239, 379, 419, 439, 479, 599, 619, 719, 739, 839, 1019, 1039, 1279, 1319, 1399, 1499, 1579, 1979, 1999, 2239, 2339, 2399, 2579, 2699, 2719, 2819, 2939, 3079, 3119, 3319, 3499, 3539, 3739, 4019, 4099, 4219, 4339, 4639, 4679
Offset: 1
Keywords
Examples
5419 = 541*10 + 9, 9 is appended to 541.
Programs
-
Mathematica
Select[10#+9&/@Prime[Range[100]],PrimeQ] (* Harvey P. Dale, Aug 20 2012 *)