|
Search: id:A113505
|
|
|
| A113505 |
|
Numbers not the sum of at most three perfect powers (A001597). |
|
+0
7
|
|
| 7, 15, 23, 87, 111, 119, 167, 335, 1391, 1455, 1607, 1679, 1991, 25887, 26375
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Cannot be written in the form a^x + b^y + c^z with a, b, c >= 0 and x, y, z > 1.
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
MATHEMATICA
|
lmt = 40000; s = Union@ Join[{0, 1}, Flatten@ Table[n^i, {n, 2, Sqrt@ lmt}, {i, 2, Log[n, lmt]}]]; t = Select[ Union[Plus @@@ Tuples[s, 3]], # < lmt + 1 &]; Complement[Range@ lmt, t] (* Robert G. Wilson v *)
|
|
CROSSREFS
|
A056828 is a subset, A001694.
Sequence in context: A133655 A029724 A056828 this_sequence A076796 A056119 A082111
Adjacent sequences: A113502 A113503 A113504 this_sequence A113506 A113507 A113508
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
R. P. van der Hilst (R.P.vanderHilst(AT)students.uu.nl), Jan 12 2006
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v (rgwv(at)rgwv.com), May 01 2006
|
|
|
Search completed in 0.002 seconds
|
