A061246 Prime having only {0, 1, 4, 9} as digits.

11, 19, 41, 101, 109, 149, 191, 199, 401, 409, 419, 449, 491, 499, 911, 919, 941, 991, 1009, 1019, 1049, 1091, 1109, 1409, 1499, 1901, 1949, 1999, 4001, 4019, 4049, 4091, 4099, 4111, 4409, 4441, 4909, 4919, 4999, 9001, 9011, 9041, 9049, 9091, 9109, 9199

Offset: 1

Author

Amarnath Murthy, Apr 23 2001

Keywords

• base
• nonn

Examples

			a(10) = 419, 419 is a prime and 1, 4 and 9 are squares.
		

Links

• Chai Wah Wu, Table of n, a(n) for n = 1..10000
• R. Ondrejka, The Top Ten: a Catalogue of Primal Configurations.
• Index to entries for primes with digits in a given set

Crossrefs

Cf. A066591.

Programs

Mathematica

Select[FromDigits/@Tuples[{0,1,4,9},4],PrimeQ] (* Harvey P. Dale, Sep 22 2019 *)

Python

from itertools import product
from sympy import isprime
A061246_list = [int(i+''.join(j)+k) for l in range(10) for i in '149' for j in product('0149',repeat=l) for k in '19' if isprime(int(i+''.join(j)+k))] # Chai Wah Wu, Jan 19 2019

Extensions

Corrected and extended by Jason Earls, May 17 2005

Edited by N. J. A. Sloane, Aug 29 2008 at the suggestion of R. J. Mathar