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!)
A218248 Recurring digital invariants of order 7. 3

%I

%S 80441,86874,253074,376762,922428,982108,1152428,2191663,2755907,

%T 2767918,8139850

%N Recurring digital invariants of order 7.

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/RecurringDigitalInvariant.html">Recurring Digital Invariant</a>

%e 2755907: 2^7 + 7^7 + 5^7 + 5^7 + 9^7 + 0^7 + 7^7 = 6586433

%e 6586433: 6^7 + 5^7 + 8^7 + 6^7 + 4^7 + 3^7 + 3^7 = 2755907,

%e so 2755907 is an order 7 recurring digital invariant.

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

%Y Cf. A218161, A218246-A218247.

%K base,fini,full,nonn

%O 1,1

%A _Arkadiusz Wesolowski_, Oct 24 2012

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 July 29 08:13 EDT 2021. Contains 346340 sequences. (Running on oeis4.)