|
|
A087191
|
|
Primes of the form k^4 - (k+1)^3.
|
|
4
|
|
|
17, 131, 409, 953, 1889, 8669, 18539, 60623, 77689, 122321, 373049, 437293, 590267, 2249441, 8975009, 9649303, 11111117, 14526289, 19836689, 26484839, 31201649, 56608289, 67796273, 80565889, 84021983, 87588089, 107150489, 150402113
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(2) = 4^4 - (4+1)^3 = 256 - 125 = 131.
|
|
MATHEMATICA
|
Select[Table[n^4-(n+1)^3, {n, 3, 101900}], PrimeQ] (* Vincenzo Librandi, Dec 10 2011 *)
|
|
PROG
|
(Magma) [a: n in [3..120] | IsPrime(a) where a is n^4-(n+1)^3]; // Vincenzo Librandi, Dec 10 2011
|
|
CROSSREFS
|
Cf. A087190 n such that n^4-(n+1)^3 is prime.
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|