OFFSET
1,1
COMMENTS
Corresponding primes are: 491, 9199, 94441, 109441, 109919, 494441, 1441049, 1441199, 1499149, which form a subsequence of A061246 (primes with square digits).
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..216
MATHEMATICA
Do[id=Union[IntegerDigits[Prime[n]], IntegerDigits[n]]; If[Count[id, 2]+Count[id, 3]+Count[id, 5]+Count[id, 6]+Count[id, 7]+Count[id, 8]==0, Print[n]], {n, 200000}]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Zak Seidov, May 17 2005
EXTENSIONS
a(10)-a(30) from Chai Wah Wu, Jan 30 2019
STATUS
approved