OFFSET
1,1
COMMENTS
Primes in whose binary expansion sum_i d_i 2^i, d_i = 1 only if i is in A131577.
LINKS
Robert Israel, Table of n, a(n) for n = 1..34
EXAMPLE
a(6) = 19 is a term because 19 = 1 + 2^(2^0) + 2^(2^2).
MAPLE
exps:= [0, seq(2^i, i=0..10)]:
S:= combinat:-powerset(exps):
select(isprime, map(proc(t) local i; add(2^i, i=t) end proc, S));
CROSSREFS
KEYWORD
nonn,base
AUTHOR
J. M. Bergot and Robert Israel, Aug 05 2022
STATUS
approved