|
|
A138059
|
|
Numbers n such that n^0+(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 is a prime.
|
|
2
|
|
|
123, 135, 201, 363, 987, 1485, 1545, 1593, 1713, 1947, 2211, 2391, 2571, 2577, 2751, 3093, 3273, 3375, 3381, 3693, 3801, 4155, 4407, 4521, 4587
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
a={}; Do[If[PrimeQ[n^70+(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], AppendTo[a, n]], {n, 10^3*5}]; a
Select[Range[5000], PrimeQ[Total[Table[(#+i)^i, {i, 0, 9}]]]&] (* Harvey P. Dale, Jun 01 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|