A138628 - OEIS

A138628

Positive integers k such that 17*k-7 is prime.

4, 10, 12, 22, 24, 30, 34, 40, 48, 52, 54, 60, 72, 78, 88, 90, 100, 114, 118, 130, 132, 138, 144, 150, 160, 172, 178, 184, 192, 198, 204, 208, 214, 220, 222, 240, 250, 262, 264, 268, 270, 274, 282, 288, 292, 298, 312, 318, 324, 328, 342, 354, 358, 360, 372

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

EXAMPLE

17*4-7=61, 17*10-7=163, 17*12-7=197, 17*22-7=367, ...

MATHEMATICA

a={}; Do[x=17*n-7; If[PrimeQ[x], AppendTo[a, n]], {n, 10^2}]; a

Select[Range[400], PrimeQ[17#-7]&] (* Harvey P. Dale, Jan 06 2011 *)

PROG

(Magma) [k:k in [1..372]|IsPrime(17*k-7)]; // Marius A. Burtea, Feb 12 2020