%I #27 Sep 08 2022 08:45:18
%S 9,10,16,18,24,28,30,34,46,48,58,60,64,70,76,78,84,94,106,108,118,120,
%T 126,136,144,148,150,154,156,160,178,186,190,198,210,226,228,234,238,
%U 240,246,256,258,268,274,276,286,294,298,300,310,324,328,330,340,346
%N Numbers k such that 11*k - 97 is prime.
%C 11 and 97 are the smallest and largest of two-digit primes.
%H Daniel Starodubtsev, <a href="/A106690/b106690.txt">Table of n, a(n) for n = 1..10000</a>
%e If k=9, then 11*k - 97 = 2 (prime).
%e If k=48, then 11*k - 97 = 431 (prime).
%t Select[Range[9, 350], PrimeQ[(11*# - 97)] &] (* _Martin Ettl_, Oct 21 2012 *)
%o (Magma) [n: n in [9..1000] | IsPrime(11*n - 97)] // _Vincenzo Librandi_, Nov 13 2010
%o (PARI) is(n)=isprime(11*n-97) \\ _Charles R Greathouse IV_, Jun 13 2017
%Y Cf. A105773, A105775.
%K nonn,easy
%O 1,1
%A _Parthasarathy Nambi_, May 13 2005