A108751 - OEIS

%I #15 Aug 19 2025 18:00:32

%S 83,84,90,92,98,102,104,108,120,122,132,134,138,144,150,152,158,168,

%T 180,182,192,194,200,210,218,222,224,228,230,234,252,260,264,272,284,

%U 300,302,308,312,314,320,330,332,342,348,350,360,368,372,374,384,398,402

%N Numbers k such that 11*k - 911 is prime.

%C 11 and 911 are primes.

%e If k=83 then 11*k - 911 = 2 (prime).

%e If k=122 then 11*k - 911 = 431 (prime).

%p a:=proc(n) if isprime(11*n-911)=true then n else fi end: seq(a(n),n=0..440); # _Emeric Deutsch_, Aug 03 2005

%t Select[Range[83,500],PrimeQ[11#-911]&] (* _Harvey P. Dale_, Apr 24 2022 *)

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

%K nonn,easy

%O 1,1

%A _Parthasarathy Nambi_, Jul 25 2005

%E More terms from _Emeric Deutsch_, Aug 03 2005