OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..11
MATHEMATICA
Select[Table[3^n + n^3 - 1, {n, 0, 500}], PrimeQ ]
PROG
(Magma) [ a: n in [0..250] | IsPrime(a) where a is 3^n + n^3 - 1 ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Sep 03 2012
STATUS
approved