OFFSET
1,1
LINKS
MATHEMATICA
Flatten[Table[Select[FromDigits /@ Tuples[{2, 6, 7}, n], PrimeQ], {n, 7}]]
PROG
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Jason Bard, Jul 13 2025
STATUS
approved
