|
%I #13 Feb 01 2020 11:57:31
%S 0,6,12,14,20,26,32,50,54,60,66,74,80,84,90,92,96,110,116,122,126,132,
%T 134,140,150,162,164,174,182,186,200,204,216,222,234,236,246,260,264,
%U 266,270,272,284,294,306,312,320,330,336,344,350
%N Numbers n such that 11*n + 97 is prime.
%H Daniel Starodubtsev, <a href="/A105773/b105773.txt">Table of n, a(n) for n = 1..10000</a>
%e If n=0, then 11*0 + 97 = 97 (prime).
%e If n=90, then 11*90 + 97 = 1087 (prime).
%t Select[Range[0, 350], PrimeQ[(11*# + 97)] &] (* _Stefan Steinerberger_, Mar 03 2006 *)
%o (PARI) is(n)=isprime(11*n+97) \\ _Charles R Greathouse IV_, Jun 06 2017
%K nonn,easy
%O 1,2
%A _Parthasarathy Nambi_, May 04 2005
%E More terms from _Stefan Steinerberger_, Mar 03 2006
|
