login
A160935
Primes of the form (n+1)^1+(n+2)^2+(n+3)^3+(n+4)^4+(n+5)^5+(n+6)^6+(n+7)^7+(n+8)^8+(n+9)^9.
1
14895727353257, 512474206568459, 1103779373734673681, 109731549455318100991819, 4249662931931407612631693, 4689665988858897033287831, 5877525788223071748329633, 8037772485664366798058773, 10876955676900411107259113, 12241767259055374446327569
OFFSET
1,1
MATHEMATICA
f[n_]:=(n+1)^1+(n+2)^2+(n+3)^3+(n+4)^4+(n+5)^5+(n+6)^6+(n+7)^7+(n+8)^8+(n+9)^9; lst={}; Do[a=f[n]; If[PrimeQ[a], AppendTo[lst, a]], {n, 0, 7!}]; lst
Select[Table[Total[Range[n+1, n+9]^Range[9]], {n, 0, 1000}], PrimeQ] (* Harvey P. Dale, Apr 03 2015 *)
Select[Table[Total[Table[(n+d)^d, {d, 9}]], {n, 1000}], PrimeQ] (* Harvey P. Dale, Sep 10 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Harvey P. Dale, Apr 03 2015
STATUS
approved