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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A072083 Numbers divisible by the 4th power of the sum of their digits in base 10. 3
1, 10, 100, 1000, 2000, 2401, 5000, 10000, 13122, 20000, 24010, 50000, 100000, 110000, 131220, 140000, 190000, 200000, 230000, 234256, 240100, 280000, 320000, 370000, 390625, 400221, 410000, 460000, 500000, 512000, 550000, 614656, 640000 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Donovan Johnson, Table of n, a(n) for n = 1..1000

EXAMPLE

n=614656: sumdigit(614656)=28, q=1, since n=28.28.28.28

MATHEMATICA

sud[x_] := Apply[Plus, IntegerDigits[x]] Do[s=sud[n]^4; If[IntegerQ[n/s], Print[n]], {n, 1, 10000}]

Select[Range[700000], Divisible[#, Total[IntegerDigits[ #]]^4]&] (* Harvey P. Dale, Jun 28 2011 *)

CROSSREFS

Cf. A005349, A003634, A072081, A072082.

Sequence in context: A136863 A031201 A228989 * A029793 A233453 A136877

Adjacent sequences:  A072080 A072081 A072082 * A072084 A072085 A072086

KEYWORD

base,nonn

AUTHOR

Labos Elemer, Jun 14 2002

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 November 20 05:07 EST 2019. Contains 329323 sequences. (Running on oeis4.)