A108159 Numbers n such that (initial n digits of decimal expansion of 1/243)-1 is prime.

3, 160, 812

Offset: 1

Author

Jason Earls, Jun 07 2005

Keywords

• more
• nonn
• base
• bref
• dumb

Links

• Eric Weisstein's World of Mathematics, 243.

Crossrefs

Cf. A021247.

Programs

Mathematica

Do[ If[ PrimeQ[ Floor[10^n/243 - 1]], Print[n]], {n, 8000}] (* Robert G. Wilson v, Jun 10 2005 *)

PARI

for(n=1,999,if(isprime(floor(1/243*10^n)-1),print1(n",")))