%I #18 Sep 08 2022 08:45:18
%S 12,16,18,22,30,36,40,42,46,48,60,70,82,88,90,96,102,112,118,120,126,
%T 130,132,148,156,166,172,180,190,196,198,202,228,238,246,250,256,258,
%U 268,280,282,286,300,316,330,340,342,348,352,382,390,406,408,420,426
%N Numbers k such that (29*k - 31) is prime.
%C 29 and 31 are twin primes.
%H Harvey P. Dale, <a href="/A107308/b107308.txt">Table of n, a(n) for n = 1..1000</a>
%e If k=48, then 29*k - 31 = 1361 (prime).
%t Select[Range[2,500],PrimeQ[29#-31]&] (* _Harvey P. Dale_, Apr 22 2016 *)
%o (Magma) [n: n in [2..100000] | IsPrime(29*n - 31)]; // _Vincenzo Librandi_, Nov 13 2010
%o (PARI) is(n)=isprime((29*n-31)) \\ _Charles R Greathouse IV_, Jun 12 2017
%Y Cf. A142003 (the resulting primes).
%K nonn,easy
%O 1,1
%A _Parthasarathy Nambi_, May 20 2005