A265486 Numbers k such that 64^k - 8^k - 1 is prime.
3, 6, 15, 19, 36, 75, 80, 118, 199, 336, 360, 520, 1282, 1810, 2872, 4870, 14467, 15102, 22499, 24675, 45615, 105648, 116432
Offset: 1
Examples
3 is in the sequence because 64^3 - 8^3 - 1 = 261631 is prime.
Programs
-
Magma
[n: n in [0..300] | IsPrime(64^n-8^n-1)];
-
Mathematica
Select[Range[1000], PrimeQ[64^# - 8^# - 1] &]
-
PARI
for(n=1, 1e3, if(ispseudoprime(64^n - 8^n - 1), print1(n, ", "))) \\ Altug Alkan, Dec 12 2015
Comments