|
%I #21 Sep 08 2022 08:45:21
%S 0,2,6,12,14,20,26,30,36,42,50,56,72,80,84,86,90,96,114,120,122,134,
%T 140,152,156,164,170,174,180,182,204,206,210,212,216,222,230,236,246,
%U 254,260,266,272,282,294,300,306,314,332,342,344,350,356,360,380,384,390
%N Numbers k such that 13*k + 11 is prime.
%H Daniel Starodubtsev, <a href="/A111369/b111369.txt">Table of n, a(n) for n = 1..10000</a>
%e k=156 is a term because 13*k + 11 = 2039 is prime.
%t Select[Range[0,400,2],PrimeQ[13#+11]&] (* _Harvey P. Dale_, Jun 17 2020 *)
%o (Magma) [n: n in [0..100000] |IsPrime(13*n+11)] // _Vincenzo Librandi_, Nov 13 2010
%o (PARI) is(n)=isprime(13*n+11) \\ _Charles R Greathouse IV_, Jun 12 2017
%Y Cf. A102721, A269100.
%K nonn,easy
%O 1,2
%A _Parthasarathy Nambi_, Nov 08 2005
|
