OFFSET
1,1
LINKS
Zak Seidov, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = sqrt(A052043(n)). - Zak Seidov, Dec 27 2014
EXAMPLE
The primes 47, 53 and 71 are not in the sequence because 47^2=2209, 53^2=2809 and 71^2=5041 contain zeros in their decimal representation.
MATHEMATICA
fQ[n_] := DigitCount[n^2][[-1]] == 0; Select[Prime@ Range@ 80, fQ] (* Robert G. Wilson v, Aug 22 2012 *)
PROG
(PARI) {p=2; for(k=1, 10^2, if(vecmin(digits(p^2))>0,
print1(p", ")); p=nextprime(1+p))}\\ Zak Seidov, Dec 24 2014
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Dec 15 1999
STATUS
approved