OFFSET
1,1
COMMENTS
EXAMPLE
4649 is in the sequence because 1/4649 = 0.00021510002151000215.... contain
only the digits 0, 1, 2 and 5.
MATHEMATICA
Join[{2, 3, 5}, Select[Prime[Range[4, 10000]], Length[Union[RealDigits[1/#][[1, 1]]]] < 10 &]]
PROG
(Python)
from sympy import n_order, nextprime
from itertools import islice
def A187614_gen(): # generator of terms
yield from (2, 3, 5)
p = 7
while True:
if len(set('0'+str(10**(n_order(10, p))//p))) < 10:
yield p
p = nextprime(p)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Lagneau, Mar 12 2011
EXTENSIONS
Extended by T. D. Noe, Mar 12 2011
STATUS
approved