OFFSET
1,1
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..10000 (first 100 terms from Harvey P. Dale)
MATHEMATICA
b256Q[n_]:=Module[{id=IntegerDigits[n, 256]}, Max[id]<10&&PrimeQ[FromDigits[id]]]; Select[ Prime[Range[35000]], b256Q] (* Harvey P. Dale, Sep 02 2023 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Cino Hilliard, Jan 18 2004
EXTENSIONS
Better definition from Omar E. Pol, Dec 24 2008
STATUS
approved