|
|
A154733
|
|
Integers of the form k = m^3+m^2 such that k-+1 are primes.
|
|
0
|
|
|
12, 150, 810, 1452, 1872, 18252, 87120, 106032, 242172, 333270, 362952, 712890, 1968750, 2763600, 3198132, 5767380, 10551420, 16451580, 18469440, 23230350, 25498620, 30468672, 31955502, 34752252, 39768102, 40825920, 56770560
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
2^3+2^2 = 12, and 12-+1 are primes, so 12 is a term.
|
|
MATHEMATICA
|
lst={}; Do[k=n^3+n^2; If[PrimeQ[k-1]&&PrimeQ[k+1], AppendTo[lst, k]], {n, 8!}]; lst
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|