OFFSET
1,1
COMMENTS
Corresponding n are given in A058829.
The next term has 473 digits.
MATHEMATICA
Select[Table[6^n - n, {n, 400}], PrimeQ[#] &]
PROG
(Magma) [a: n in [0..400] | IsPrime(a) where a is 6^n-n ];
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Jun 05 2016
STATUS
approved