|
Search: id:A072896
|
|
|
| A072896 |
|
5th order digital invariants: the sum of the 5th powers of the digits of n equals some number k and the sum of the 5th powers of the digits of k equals n. |
|
+0
1
|
|
| 1, 4150, 4151, 54748, 58618, 76438, 89883, 92727, 93084, 157596, 194979
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
REFERENCES
|
David Wells, The Penguin Dictionary of Curious and Interesting Numbers, Revised Edition, London, England, 1997, pgs. 157&168.
|
|
EXAMPLE
|
58618 is included because 5^5 + 8^5 + 6^5 + 1^5 + 8^5 = 76438 and 7^5 + 6^5 + 4^5 + 3^5 + 8^5 = 58618.
|
|
MATHEMATICA
|
f[n_] := Apply[Plus, IntegerDigits[Apply[Plus, IntegerDigits[n]^5]]^5]; Select[ Range[10^7], f[ # ] == # &]
|
|
CROSSREFS
|
Cf. A072409.
Adjacent sequences: A072893 A072894 A072895 this_sequence A072897 A072898 A072899
Sequence in context: A162003 A107541 A106537 this_sequence A052464 A161752 A145205
|
|
KEYWORD
|
nonn,fini,full,base
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 09 2002
|
|
|
Search completed in 0.002 seconds
|
