A104227 Primes one less than the sum over a sexy prime pair.
19, 31, 67, 79, 127, 139, 151, 199, 211, 307, 547, 619, 739, 751, 919, 1087, 1231, 1459, 1471, 1759, 1987, 2131, 2179, 2239, 2251, 2467, 2647, 2851, 2971, 3319, 3331, 3391, 3499, 3511, 3559, 3571, 3727, 3739, 4027, 4567, 4759, 5107, 5347, 5419, 5431, 6367, 6607, 6619, 7027, 7219, 7459
Offset: 1
Examples
19=7+13-1 is a prime and one less than the sum 7+13 over the second sexy prime pair.
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Select[2#+5&/@Select[Prime[Range[600]],PrimeQ[#+6]&],PrimeQ] (* Harvey P. Dale, Jan 04 2020 *)
Extensions
Corrected definition. Extended beyond a(7). - R. J. Mathar, Nov 26 2008
Comments