A224469 Primes of the form 8^n - n.

7, 509, 2596148429267413814265248164610011, 43556142965880123323311949751266331066323

Offset: 1

Author

Alex Ratushnyak, Apr 06 2013

Keywords

• nonn

Comments

The next term is too big to display.

Corresponding n are given in A224471.

Crossrefs

Cf. A081296, A224420, A224451, A224468, A024089, A224471.

Programs

Maple

A224469:=proc(q) local n;
for n from 1 to q do if isprime(8^n-n) then print(8^n-n); fi; od; end:
A224469(100); # Paolo P. Lava, Apr 19 2013

Mathematica

Select[Table[8^n - n, {n, 500}], PrimeQ] (* Alonso del Arte, Apr 06 2013 *)