login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A218247 Recurring digital invariants of order 6. 2
17148, 63804, 93531, 239459, 282595 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..5.

Eric Weisstein's World of Mathematics, Recurring Digital Invariant

EXAMPLE

63804: 6^6 + 3^6 + 8^6 + 0^6 + 4^6 = 313625

313625: 3^6 + 1^6 + 3^6 + 6^6 + 2^6 + 5^6 = 63804,

so 63804 is an order 6 recurring digital invariant.

MATHEMATICA

lst = {}; f[n_] := Total[IntegerDigits[n]^6]; Do[a = n; Do[a = f[a]; If[a < n, Break[]]; If[a == n && ! n == f[n], AppendTo[lst, n]; Break[]], {30}], {n, 10^6}]; lst

CROSSREFS

Cf. A218161, A218246, A218248.

Sequence in context: A233610 A121669 A247697 * A235891 A251207 A233993

Adjacent sequences:  A218244 A218245 A218246 * A218248 A218249 A218250

KEYWORD

base,fini,full,nonn

AUTHOR

Arkadiusz Wesolowski, Oct 24 2012

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 February 28 01:46 EST 2020. Contains 332319 sequences. (Running on oeis4.)