login
A089033
Numbers n such that 7*n+3 is prime.
10
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
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.
Sequence in context: A091992 A206037 A242247 * A049422 A178215 A067925
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