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

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

Crossrefs

Sequence in context: A310345 A310346 A080285 * A050868 A007319 A352213

Adjacent sequences: A138625 A138626 A138627 * A138629 A138630 A138631

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, May 14 2008

Extensions

Extended by Harvey P. Dale, Jan 06 2011

Status

approved