OFFSET
1,1
COMMENTS
Primes that only contain digits that are 0 or integer powers of 3.
LINKS
MATHEMATICA
Select[FromDigits /@ Tuples[{0, 1, 3, 9}, n], PrimeQ]
PROG
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Jason Bard, Jul 14 2025
STATUS
approved
