A240520 Numbers that set a new integer record for the ratio between the product and the sum of their digits

1, 36, 66, 88, 257, 268, 279, 369, 459, 578, 579, 678, 789, 999, 2589, 2688, 2799, 3699, 3789, 4599, 4689, 4789, 5788, 5889, 7889, 8888, 18999, 25889, 26789, 26888, 27788, 28899, 37899, 38889, 45999, 46899, 47799, 47889, 55899, 56889, 57789, 58999, 78999, 257899

Offset

1,2

Links

Paolo P. Lava and Giovanni Resta, Table of n, a(n) for n = 1..1000 (first 100 terms from Paolo P. Lava)

Example

For n = 2 we have 2 / 2 = 1.
For n = 36 we have 18 / 9 = 2.
For n = 66 we have 36 / 12 = 3.
For n = 88 we have 64 / 16 = 4.
Etc.

Maple

S:=proc(s) local j, w; w:=convert(s, base, 10); sum(w[j], j=1..nops(w)); end:
U:=proc(s) local j, w; w:=convert(s, base, 10); mul(w[j], j=1..nops(w)); end:
P:=proc(q) local a, n; a:=0;
for n from 2 to q do if type(U(n)/S(n), integer) then if U(n)/S(n)>a then
a:=U(n)/S(n); print(n); fi; fi; od; end: P(10^6);

Crossrefs

A038367.

Sequence in context: A060671 A269499 A074315 * A126789 A176623 A211724

Adjacent sequences: A240517 A240518 A240519 * A240521 A240522 A240523

Keyword

nonn,easy,base

Author

Paolo P. Lava, Apr 07 2014

Status

approved