OFFSET
1,2
COMMENTS
Numbers k such that A027622(k) is prime.
LINKS
EXAMPLE
MATHEMATICA
With[{c=Total[Table[(#+i)^(i+1), {i, 0, 4}]]}, Select[Range[600], PrimeQ[c]&]] (* Harvey P. Dale, May 07 2012 *)
PROG
(Magma) [n: n in [0..1000] |IsPrime(n+(n+1)^2+(n+2)^3+(n+3)^4+(n+4)^5)]; // Vincenzo Librandi, Nov 20 2010
(PARI) is(n)=isprime(n+(n+1)^2+(n+2)^3+(n+3)^4+(n+4)^5) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
Edited by N. J. A. Sloane, May 21 2008 at the suggestion of R. J. Mathar
STATUS
approved