%I #20 Jan 29 2023 12:11:58

%S 41,281,5849,8209,11801,29921,33569,51929,70489,77969,128201,139609,

%T 196769,219689,346321,415801,450649,532241,543929,602489,625969,

%U 684809,743849,755681,767521,922169,934121,946081,958049

%N Primes that become squares when prefixed with an 8.

%C Subsequence of primes of A273363. - _Michel Marcus_, Jun 24 2016

%H Vincenzo Librandi, <a href="/A167741/b167741.txt">Table of n, a(n) for n = 1..131</a>

%t Select[Prime[Range[10000]], IntegerQ[Sqrt[FromDigits[Join[{8}, IntegerDigits[#]]]]]&] (* _G. C. Greubel_, Jun 23 2016 *)

%t Select[Prime[Range[80000]],IntegerQ[Sqrt[8*10^IntegerLength[#]+#]]&] (* _Harvey P. Dale_, Jan 29 2023 *)

%Y Cf. A167734, A167735, A167736, A167737, A167738, A167739, A167740.

%Y Cf. A273363.

%K base,nonn

%O 1,1

%A _Claudio Meller_, Nov 10 2009

%E Definition corrected and sequence extended by _Michel Marcus_, Aug 05 2013