OFFSET
1,1
LINKS
Sebastian Petzelberger, Table of n, a(n) for n = 1..10000
Carlos Rivera, Puzzle 280. 3893257, The Prime Puzzles and Problems Connection.
EXAMPLE
The 3 iterations: 3893257 --> 1110110110100000001001 --> ... --> ... are prime.
PROG
(PARI) isok(n, nb=3) = {for (k=1, nb, b = binary(n); d = eval(subst(Pol(b), x, 10)); if (! isprime(d), return (0)); n = d; ); return (1); } \\ Michel Marcus, Apr 08 2015
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Sebastian Petzelberger, Apr 06 2015
STATUS
approved