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,2

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

Formula

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

Mathematica

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

Prog

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

Crossrefs

A045437 gives primes, A090613 gives prime index.

Cf. A024903, A033868, A090614.

Sequence in context: A091992 A206037 A242247 * A049422 A178215 A067925

Adjacent sequences: A089030 A089031 A089032 * A089034 A089035 A089036

Keyword

easy,nonn

Author

Giovanni Teofilatto, Nov 12 2003

Extensions

Corrected and extended by Ray Chandler, Nov 12 2003

Offset corrected by Arkadiusz Wesolowski, Aug 09 2011

Status

approved