OFFSET
1,1
LINKS
Jeozadaque Marcos da Silva, Table of n, a(n) for n = 1..22
MATHEMATICA
seq[digmax_] := Sort[Select[Table[IntegerReverse[2^n], {n, 0, Floor[digmax*Log2[10]]}], PrimeQ]]; seq[33] (* Amiram Eldar, Oct 02 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Jan 06 2005
STATUS
approved