A089033 Numbers n such that 7*n+3 is prime.

0, 2, 4, 8, 10, 14, 22, 28, 32, 34, 38, 40, 44, 50, 52, 58, 68, 74, 80, 82, 88, 92, 94, 110, 112, 118, 122, 134, 140, 142, 148, 158, 160, 164, 170, 178, 182, 184, 188, 194, 208, 212, 220, 224, 230, 232, 238, 242, 250, 260, 268, 272, 278, 298, 304, 320, 334, 340

Offset: 1

Author

Giovanni Teofilatto, Nov 12 2003

Keywords

• easy
• nonn

References

• M. Cerasoli, F. Eugeni and M. Protasi, Elementi di Matematica Discreta, Bologna 1988.
• Emanuele Munarini and Norma Zagaglia Salvi, Matematica Discreta, UTET, CittaStudiEdizioni, Milano 1997.

Links

• Daniel Starodubtsev, Table of n, a(n) for n = 1..10000

Crossrefs

A045437 gives primes, A090613 gives prime index.

Cf. A024903, A033868, A090614.

Programs

Mathematica

Select[Range[1000],PrimeQ[7#+3]&]

PARI

is(n)=isprime(7*n+3) \\ Charles R Greathouse IV, Feb 17 2017

Formula

a(n) = A024903(n)-1 = A033868(n)-2 = A090614(n)*2.

Extensions

Corrected and extended by Ray Chandler, Nov 12 2003

Offset corrected by Arkadiusz Wesolowski, Aug 09 2011