OFFSET
1,1
COMMENTS
Primes whose base 8 representations contain only 0's and 1's.
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
PROG
(PARI) isok(n) = {digs = digits(n, 8); for (i = 1, #digs, if (digs[i] > 1, return (0)); ); return (1); }
lista(nn) = {forprime (p=1, nn, if (isok(p), print1(p, ", "); ); ); } \\ Michel Marcus, Sep 14 2013
(PARI) forstep(n=7, 999, 2, t=fromdigits(binary(n), 8); if(isprime(t), print1(t", "))) \\ Charles R Greathouse IV, Jun 08 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Nov 19 2002
EXTENSIONS
More terms from Francois Jooste (phukraut(AT)hotmail.com), Dec 23 2002
STATUS
approved