OFFSET
1,1
COMMENTS
0-free subset of A036960. "Dice Primes": the ordered sequence of prime numbers whose digits can be generated by successively throwing a regular die with the numbers 1,2,...,6. There are n^6 elements of A057436 with n digits. Restricting to primes, we have 3 with 1 digit, 8 with 2 digits, 23 with 3 digits.
MATHEMATICA
Select[Prime[Range[250]], Length[Intersection[IntegerDigits[ # ], {7, 8, 9, 0}]] == 0 &] (* Stefan Steinerberger, Jan 03 2008 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Jonathan Vos Post, Jan 02 2008
EXTENSIONS
More terms from Stefan Steinerberger, Jan 03 2008
STATUS
approved