OFFSET
1,1
COMMENTS
Prime terms are in A020459.
MATHEMATICA
Flatten@ Array[FromDigits /@ Tuples[{2, 7}, #] &, 5] (* Michael De Vlieger, Apr 06 2017 *)
PROG
(Magma) [n: n in [1..100000] | Set(IntegerToSequence(n, 10)) subset {2, 7}]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Apr 05 2017
STATUS
approved