%I #9 Feb 20 2017 14:52:49
%S 1,4,5,6,10,11,16,21,26,34,36,44,45,49,54,55,59,65,69,71,76,80,85,91,
%T 95,96,100,104,106,110,114,115,120,121,125,135,139,166,169,176,180,
%U 190,195,201,204,206,214,226,230,231,234,241,254,256,264,265,269,270,275,280
%N Numbers n such that 14n^2 - 1 is prime.
%H Harvey P. Dale, <a href="/A143833/b143833.txt">Table of n, a(n) for n = 1..1000</a>
%t p = 14; a = {}; Do[k = p x^2 - 1; If[PrimeQ[k], AppendTo[a, x]], {x, 1, 1000}]; a
%t Select[Range[300],PrimeQ[14#^2-1]&] (* _Harvey P. Dale_, Aug 29 2011 *)
%o (PARI) is(n)=isprime(14*n^2-1) \\ _Charles R Greathouse IV_, Feb 20 2017
%Y Cf. A066436, A066049, A090686, A090684, A143826, A143827, A143828, A143829, A143830, A143831, A143832.
%K nonn
%O 1,2
%A _Artur Jasinski_, Sep 02 2008