1,1

Table of n, a(n) for n=1..61.

(PARI) a000695(n) = fromdigits(binary(n), 4);

isok(n) = isprime(a000695(prime(n))); \\ Michel Marcus, Dec 18 2018

Cf. A152078, A077718.

Sequence in context: A046668 A047533 A060525 * A047359 A027700 A262300

Adjacent sequences: A152860 A152861 A152862 * A152864 A152865 A152866

nonn

Vladimir Shevelev, Dec 14 2008

More terms from Michel Marcus, Dec 18 2018

approved