|
Search: id:A153504
|
|
|
| A153504 |
|
Numbers n such that n^8+(n+1)^8 is a prime |
|
+0
3
|
|
| 1, 5, 17, 23, 32, 33, 35, 39, 42, 66, 68, 76, 78, 90, 113, 118, 129, 152, 181, 186, 188, 198, 220, 221, 229, 231, 287, 300, 306, 307, 311, 316, 348, 362, 380, 401, 409, 414, 426, 443, 453, 464, 487, 503, 508, 510, 511, 560, 572, 593, 628, 644, 646, 662, 691
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
EXAMPLE
|
For n=1, n^8+(n+1)^8=257; n=32, n^8+(n+1)^8=2505920246017
|
|
MATHEMATICA
|
lst = {}; Do[ If[ PrimeQ[n^8 + (n + 1)^8], AppendTo[lst, n]], {n, 1000}]; lst [From Robert G. Wilson, v (rgwv(AT)rgwv.com), Feb 17 2009]
|
|
CROSSREFS
|
Sequence in context: A091209 A054997 A067377 this_sequence A044438 A101414 A105884
Adjacent sequences: A153501 A153502 A153503 this_sequence A153505 A153506 A153507
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Dec 28 2008
|
|
EXTENSIONS
|
I added the Mathematica coding and extended the sequence. Robert G. Wilson, v (rgwv(AT)rgwv.com), Feb 17 2009
|
|
|
Search completed in 0.002 seconds
|
