A138643 Nonnegative integers k such that 19*k-3 is prime.

4, 8, 14, 26, 34, 38, 40, 50, 56, 64, 68, 70, 88, 94, 104, 106, 110, 118, 130, 134, 140, 158, 160, 190, 200, 206, 218, 220, 224, 236, 238, 256, 260, 266, 278, 284, 286, 290, 298, 308, 328, 334, 346, 356, 370, 374, 386, 388, 398, 404, 416, 424, 430, 434, 454, 458

Offset

1,1

Links

Andrew Howroyd, Table of n, a(n) for n = 1..1000

Example

19*4 - 3 = 73, 19*8 - 3 = 149, 19*14 - 3 = 263, 19*26 - 3 = 491, ...

Mathematica

a={}; Do[x=19*n-3; If[PrimeQ[x], AppendTo[a, n]], {n, 10^2}]; a
Select[Range[500], PrimeQ[19#-3]&] (* Harvey P. Dale, Apr 18 2021 *)

Prog

(PARI) select(k->isprime(19*k-3), [1..500]) \\ Andrew Howroyd, Feb 02 2020

Crossrefs

Sequence in context: A020185 A008029 A129080 * A183977 A153364 A124743

Adjacent sequences: A138640 A138641 A138642 * A138644 A138645 A138646

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, May 15 2008

Extensions

Terms a(22) and beyond from Andrew Howroyd, Feb 02 2020

Status

approved