A107992 - OEIS

%I #13 Jan 31 2020 13:22:29

%S 2,4,10,14,16,22,26,32,46,50,52,56,64,74,80,92,94,100,106,112,124,130,

%T 134,136,142,152,164,166,170,172,176,182,190,194,196,214,220,232,236,

%U 242,254,260,262,274,284,290,292,296,302,310,320,322,326,334,346,350

%N Numbers n such that 11*n - 3 is prime.

%H Harvey P. Dale, <a href="/A107992/b107992.txt">Table of n, a(n) for n = 1..1000</a>

%e If n=2, then 11*n - 3 = 19 (prime).

%e If n=50, then 11*n - 3 = 547 (prime).

%p a:=proc(n) if isprime(11*n-3)=true then n else fi end: seq(a(n),n=1..400); # _Emeric Deutsch_, Jun 26 2005

%t Select[Range[400],PrimeQ[11#-3]&] (* _Harvey P. Dale_, Jan 31 2020 *)

%o (PARI) is(n)=isprime(11*n-3) \\ _Charles R Greathouse IV_, Jun 13 2017

%K nonn,easy

%O 1,1

%A _Parthasarathy Nambi_, Jun 14 2005

%E More terms from _Emeric Deutsch_, Jun 26 2005