OFFSET
1,1
COMMENTS
As k^3 + k^2 + k + 1 = (k + 1) * (k^2 + 1) and k <= 1 does not give a term, k + 1 and k^2 + 1 must be prime so k must be even. - David A. Corneth, May 30 2023
FORMULA
EXAMPLE
15 is in the sequence as 15 = 3*5 = 2^3+2^2+2+1; 15 is a product of two distinct primes and of the form k^3 + k^2 + k + 1.
MATHEMATICA
f[n_]:=Last/@FactorInteger[n]=={1, 1}; Select[Array[ #^3+#^2+#+1&, 7! ], f[ # ]&]
PROG
(PARI) upto(n) = {my(res = List(), u = sqrtnint(n, 3) + 1); forprime(p = 3, u, c = (p-1)^2 + 1; if(isprime(c), listput(res, c*p))); res} \\ David A. Corneth, May 30 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Apr 07 2010
EXTENSIONS
Name corrected by and more terms from David A. Corneth, May 30 2023
STATUS
approved
