A224469 Primes of the form 8^n - n.

7, 509, 2596148429267413814265248164610011, 43556142965880123323311949751266331066323

Offset

1,1

Comments

The next term is too big to display.

Corresponding n are given in A224471.

Links

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

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 *)

Crossrefs

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

Sequence in context: A293180 A203472 A219873 * A347907 A320980 A080975

Adjacent sequences: A224466 A224467 A224468 * A224470 A224471 A224472

Keyword

nonn

Author

Alex Ratushnyak, Apr 06 2013

Status

approved