login
A086212
Primes in A071998.
0
1100101, 100110001001011011101111, 101001111111111111010001, 101010010110001110101101, 101010011000011011011111, 101111101111000111100010101, 110100100000010010110010101
OFFSET
1,1
COMMENTS
Conjecture: there is an infinity of primes in A071998.
PROG
(PARI) binofbin(n) = { c=0; for(x=0, n, b=binary(x); ln=length(b); z=Str(b[1]); for(j=2, ln, z=concat(Str(z), Str(b[j])); ); d = eval(z); b=binary(d); ln=length(b); z=Str(b[1]); for(j=2, ln, z=concat(Str(z), Str(b[j])); ); \ print1(z, ", ") if(isprime(eval(z)), print1(eval(z), ", "); c++) ); print(); print(c) }
CROSSREFS
Sequence in context: A172754 A268036 A184384 * A316481 A253619 A235221
KEYWORD
base,nonn
AUTHOR
Cino Hilliard, Sep 08 2003
STATUS
approved