This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A111052 #27 Sep 06 2024 08:05:45
%S A111052 1,3,5,7,11,19,21,25,31,33,37,39,45,49,53,73,75,77,81,89,91,93,107,
%T A111052 115,119,129,131,135,137,145,157,185,187,193,203,205,207,213,215,221,
%U A111052 227,229,231,249,259,261,263,271,283,291,297,299,301,317,325,327,331
%N A111052 Numbers m such that 3*m^2 + 4 is prime.
%H A111052 Harvey P. Dale, <a href="/A111052/b111052.txt">Table of n, a(n) for n = 1..1000</a>
%F A111052 a(n) = sqrt((A201477(n)-4)/3). - _Zak Seidov_, Feb 04 2016
%e A111052 If m=77 then 3*m^2 + 4 = 17791 (prime).
%t A111052 Select[Range[340], PrimeQ[3*#^2 + 4] &] (* _Stefan Steinerberger_, Feb 26 2006 *)
%o A111052 (PARI) lista(nn) = {for(n=1, nn, if(ispseudoprime(3*n^2 + 4), print1(n, ", ")));} \\ _Altug Alkan_, Feb 05 2016
%o A111052 (Magma) [n: n in [1..350] | IsPrime(3*n^2+4)]; // _Vincenzo Librandi_, Feb 06 2016
%Y A111052 Cf. A201477.
%K A111052 nonn,easy
%O A111052 1,2
%A A111052 _Parthasarathy Nambi_, Oct 06 2005
%E A111052 More terms from _Stefan Steinerberger_, Feb 26 2006