Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #15 Aug 16 2019 14:02:46
%S 0,2,20,26,30,32,42,54,62,72,96,114,126,132,134,140,144,152,174,176,
%T 182,194,200,204,216,222,240,270,282,302,314,324,350,356,372,404,422,
%U 446,450,452,470,474,480,504,506,510,522,524,530,552,560,572,594,620,624
%N Numbers n such that 193*n + 191 is prime.
%C 191 and 193 are twin primes.
%H Chris Caldwell, <a href="http://www.utm.edu/research/primes/lists/small/1ktwins.txt">The First 1,008 Twin Primes</a>.
%e If n=72, then 193*n + 191 = 14087 (prime).
%p a:=proc(n) if isprime(193*n+191)=true then n else fi end: seq(a(n),n=0..700); # _Emeric Deutsch_, Jun 10 2005
%t Select[Range[0,700],PrimeQ[193#+191]&] (* _Harvey P. Dale_, Jan 20 2014 *)
%o (PARI) is(n)=isprime(193*n+191) \\ _Charles R Greathouse IV_, Jun 13 2017
%K nonn,easy
%O 1,2
%A _Parthasarathy Nambi_, Jun 02 2005
%E More terms from _Emeric Deutsch_, Jun 10 2005