A167739 Primes that become squares when prefixed with a 6.
241, 1009, 3001, 44809, 67489, 93889, 145441, 195121, 205081, 235009, 285049, 295081, 355441, 416089, 538249, 558721, 620329, 713281, 744409, 817321, 1199329, 1418569, 1481281, 1889689, 1952641, 2520649, 2742241, 3409369, 3504961, 3568729, 3792169, 3952009
Offset: 1
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..20000 (first 105 terms from Vincenzo Librandi)
Programs
-
Mathematica
Select[Prime[Range[300000]],IntegerQ[Sqrt[FromDigits[Join[{6}, IntegerDigits[ #]]]]]&] (* Harvey P. Dale, May 05 2012 *)
Extensions
More terms from Harvey P. Dale, May 05 2012