OFFSET
1,1
COMMENTS
For p>3, all terms are divisible by 13.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..250
MATHEMATICA
Table[(4^Prime[n] - 3^Prime[n] - 1), {n, 1, 30}]
4^#-3^#-1&/@Prime[Range[20]] (* Harvey P. Dale, May 27 2026 *)
PROG
(Magma) [4^p-3^p-1: p in PrimesUpTo(60)];
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Vincenzo Librandi, Jul 07 2014
STATUS
approved
