login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A161610 Primes which are the sum of 3 distinct positive 5th powers. 1
9043, 17863, 32801, 40787, 43669, 50599, 62417, 76099, 101267, 104149, 107777, 135893, 160073, 164419, 249107, 249857, 256609, 259733, 266663, 340649, 348833, 365639, 430343, 504061, 545843, 554663, 604649, 627901, 640949, 762743, 776183 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Intersection of the A000040 with the sequence 276, 1057, 1268, 1299, 3158,... of sums of 3 distinct positive 5th powers. [R. J. Mathar, Jun 18 2009]

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..5000

EXAMPLE

9043=6^5+4^5+3^5. 17863=7^5+4^5+2^5. 32801=8^5+2^5+1^5. 40787=8^5+6^5+3^5, 43669=8^5+6^5+5^5.

MATHEMATICA

lst={}; Do[Do[Do[p=n^5+m^5+k^5; If[PrimeQ[p], AppendTo[lst, p]], {n, m+1, 3*4!}], {m, k+1, 6!}], {k, 2*6!}]; Take[Union[lst], 5! ]

Module[{upto=10^6}, Select[Total/@Subsets[Range[Ceiling[Surd[upto, 5]]]^5, {3}], PrimeQ[#]&&#<=upto&]]//Union (* Harvey P. Dale, May 01 2019 *)

CROSSREFS

Cf. A085319, A003348.

Sequence in context: A031773 A128374 A210179 * A204535 A202914 A252443

Adjacent sequences:  A161607 A161608 A161609 * A161611 A161612 A161613

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, Jun 14 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 19 18:39 EST 2019. Contains 329323 sequences. (Running on oeis4.)