|
%I #15 Sep 08 2022 08:45:19
%S 4,10,12,18,22,24,28,34,40,42,52,54,60,70,78,88,94,108,112,118,120,
%T 130,132,144,148,154,160,168,174,180,190,192,202,204,208,210,222,232,
%U 238,244,250,258,264,270,280,288,300,304,322,328,334,340,342,364,372,378
%N Numbers n such that 11*n - 1 is prime.
%H Harvey P. Dale, <a href="/A107960/b107960.txt">Table of n, a(n) for n = 1..1000</a>
%e If n=4, then 11*n - 1 = 43 (prime).
%e If n=42, then 11*n - 1 = 461 (prime).
%t Select[Range[400],PrimeQ[11#-1]&] (* _Harvey P. Dale_, Jul 18 2022 *)
%o (Magma) [n: n in [0..100000] | IsPrime(11*n - 1)] // _Vincenzo Librandi_, Nov 13 2010
%o (PARI) is(n)=isprime(11*n-1) \\ _Charles R Greathouse IV_, Jun 13 2017
%K nonn,easy
%O 1,1
%A _Parthasarathy Nambi_, Jun 14 2005
|
