%I #20 Sep 08 2022 08:45:12
%S 1,2,3,4,6,7,8,10,14,17,18,19,20,21,25,29,37,38,40,41,42,43,46,50,51,
%T 52,54,58,59,61,62,63,65,70,71,72,74,75,76,80,84,86,92,93,94,96,101,
%U 102,109,113,114,117,119,126,130,135,137,140,145,148,150,151,152,156,160
%N Numbers n such that (6n-3)^2 + 2 is prime.
%C Arises from A056899: primes of the form m^2+2; m should be of the form 6n-3, hence this sequence.
%H Vincenzo Librandi, <a href="/A091199/b091199.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A056900(n-1) + 1. - _Jeppe Stig Nielsen_, May 14 2017
%e 10 is a member because (60-3)^2 + 2 = 3251 is prime.
%t Select[ Range[ 163], PrimeQ[(6# - 3)^2 + 2] &] (* _Robert G. Wilson v_, Feb 26 2004 *)
%t lst={};Do[If[PrimeQ[(6n-3)^2+2],AppendTo[lst,n]],{n,500}];lst (* _Vincenzo Librandi_, Jul 16 2012 *)
%o (Magma) [n: n in [1..250]| IsPrime((6*n-3)^2+2)]; // _Vincenzo Librandi_, Jul 16 2012
%o (PARI) is(n)=isprime((6*n-3)^2+2) \\ _Charles R Greathouse IV_, May 22 2017
%Y Cf. A056899, A056900.
%K easy,nonn
%O 1,2
%A _Zak Seidov_, Feb 22 2004
%E More terms from _Ray Chandler_ and _Robert G. Wilson v_, Feb 25 2004