A167723 Squares that become prime numbers when prefixed with an 8.
9, 81, 2601, 3969, 4761, 6561, 25281, 31329, 35721, 56169, 59049, 68121, 71289, 91809, 131769, 149769, 168921, 194481, 199809, 210681, 221841, 263169, 301401, 335241, 370881, 423801, 439569, 463761, 480249, 576081, 603729, 613089, 622521
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A032671.
Programs
-
Mathematica
Select[Range[1, 500000, 2]^2, PrimeQ[FromDigits[Join[{8}, IntegerDigits[#]]]] &] (* G. C. Greubel, Jun 21 2016 *)
Comments