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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A037045 5-white numbers: partition digits of n^5 into blocks of 5 starting at right; sum of these 5-digit numbers equals n. 11

%I

%S 0,1,27100,73440,95120,104336,139564,143901,144442,148780,155555,

%T 165311,172898,182655,195119,204876,204877,212463,216530,217341,

%U 227098,233873,234685,238752,239021,239563,244441,248779,251216,255554,260432

%N 5-white numbers: partition digits of n^5 into blocks of 5 starting at right; sum of these 5-digit numbers equals n.

%H Paolo P. Lava, <a href="/A037045/b037045.txt">Table of n, a(n) for n = 1..53</a>

%e 27100 is a 5-white number since 27100^5=14616603103510000000000 and 146+16603+10351+00000+00000=27100.

%t w5Q[n_]:=Module[{idn5=IntegerDigits[n^5],len},len=Length[idn5];Total[ FromDigits/@Partition[PadLeft[idn5,len+5-Mod[len,5]],5]]==n]; Select[ Range[0,300000],w5Q] (* _Harvey P. Dale_, Jul 27 2011 *)

%t Select[Range[0, 10^6], # == Plus@@ IntegerDigits[#^5, 10^5] &] (* _Giovanni Resta_, Jul 12 2016 *)

%Y Cf. A037043, A037044.

%K full,nonn,fini,easy,base,nice

%O 1,3

%A _Erich Friedman_

%E Offset set to 1 by _Paolo P. Lava_, Jul 12 2016

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 September 21 11:18 EDT 2019. Contains 327253 sequences. (Running on oeis4.)