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 A173827 #4 Apr 24 2013 09:07:33
%S A173827 2,7,37,43,47,67,73,149,163,167,223,337,349,353,359,409,421,439,487,
%T A173827 499,577,587,617,691,787,823,829,911,947,1039,1063,1087,1201,1297,
%U A173827 1321,1361,1367,1453,1459,1483,1609,1621,1657,1777,1783,1987,1993,2011,2137,2143
%N A173827 Primes p such that p+(floor(Sqrt(p)))^2 is prime.
%C A173827 2+1=3 prime, 7+4=11 prime, 37+36=73 prime,...
%t A173827 f[n_]:=n+(Floor[Sqrt[n]])^2;lst={};Do[p=Prime[n];If[PrimeQ[f[p]],AppendTo[lst,p]],{n,7!}];lst
%t A173827 Select[Prime[Range[400]],PrimeQ[#+Floor[Sqrt[#]]^2]&] (* _Harvey P. Dale_, Apr 24 2013 *)
%Y A173827 Cf. A086085, A086086, A135932, A173826
%K A173827 nonn
%O A173827 1,1
%A A173827 _Vladimir Joseph Stephan Orlovsky_, Feb 25 2010