A109603 - OEIS

%I #9 Jun 13 2017 12:37:00

%S 1,4,10,16,18,24,28,30,54,60,64,66,70,78,84,94,100,106,108,114,120,

%T 136,144,148,154,180,196,204,214,220,226,238,250,264,268,276,288,294,

%U 318,330,334,336,348,360,376,390,394,396,400,406,414

%N Numbers n such that 43*n - 41 is prime.

%e If n=1 then 43*n - 41 = 2 (prime).

%e If n=94 then 43*n - 41 = 4001 (prime).

%t Select[Range[500], PrimeQ[(43# - 41)] &] (* _Stefan Steinerberger_, Feb 28 2006 *)

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

%K nonn,easy

%O 1,2

%A _Parthasarathy Nambi_, Jul 30 2005

%E More terms from _Stefan Steinerberger_, Feb 28 2006