login
A163319
Primes of the form 3^n-n^3.
3
2, 17, 58049, 6461081889226673298791633, 273892744995340833777347939263771534786080723598328513, 141158163862183763292171284564016760661754655311572624335224092241585052457078933432718798844633407313
OFFSET
1,1
COMMENTS
Generated by the n of A109387. The number of decimal digits in this sequence grows as 1, 2, 5, 25, 54, 102, 166, 194,...
The large terms beyond a(6) are not shown.
MATHEMATICA
f[n_]:=3^n-n^3; lst={}; Do[If[PrimeQ[f[n]], AppendTo[lst, f[n]]], {n, 4*5!}]; lst
CROSSREFS
Sequence in context: A174305 A003819 A078624 * A269836 A114950 A112969
KEYWORD
nonn
AUTHOR
EXTENSIONS
Edited by R. J. Mathar, Jul 26 2009
STATUS
approved