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 A167736 #25 Sep 04 2025 20:26:24
%S A167736 61,4969,6481,9601,23761,26041,37561,68449,88129,129361,179089,214849,
%T A167736 265249,301489,308761,411409,455881,463321,485689,508129,523129,
%U A167736 530641,659569,713329,751969,829849,916441,924361,948169,964081,996001,1058329,1147561,1281649
%N A167736 Primes that become squares when prefixed with a 3.
%H A167736 Alois P. Heinz, <a href="/A167736/b167736.txt">Table of n, a(n) for n = 1..20000</a> (first 107 terms from Vincenzo Librandi)
%t A167736 Select[Prime[Range[1000000]],IntegerQ[Sqrt[FromDigits[Join[{3}, IntegerDigits[ #]]]]]&] (* _Harvey P. Dale_, Nov 01 2011 *)
%o A167736 (PARI)
%o A167736 \\ terms upto 10^n
%o A167736 upto(n) = {my(sqrt31 = sqrt(3.1), sqrt40 = sqrt(4.0), r); for(k=2, n, for(j = ceil((sqrt31 * sqrt(10^k))), floor(sqrt40 * sqrt(10^k)), r = j^2%10^k; if(isprime(r), print1(r", "))))} \\ _David A. Corneth_, Jun 24 2016
%Y A167736 Cf. A167734, A167735, A167737, A167738, A167739, A167740, A167741.
%K A167736 base,nonn,changed
%O A167736 1,1
%A A167736 _Claudio Meller_, Nov 10 2009
%E A167736 More terms from _Harvey P. Dale_, Nov 01 2011