|
| |
|
|
A147823
|
|
Minimum number k for which the digital sum of k*n is 3n.
|
|
2
| |
|
|
0, 3, 3, 3, 12, 39, 33, 57, 111, 111, 3999, 3909, 2499, 3846, 6357, 33333, 43743, 52347, 111111, 310521
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
MAPLE
| P:=proc(i) local j, k, n, ok, w; for n from 0 by 1 to i do j:=-1; ok:=1; while ok=1 do j:=j+1; w:=0; k:=n*j; while k>0 do w:=w+k-(trunc(k/10)*10); k:=trunc(k/10); od; if w=3*n then ok:=0; print(j); fi; od; od; end: P(100);
|
|
|
CROSSREFS
| A147822, A147824-A147831
Sequence in context: A170851 A052900 A024947 * A183554 A196529 A110668
Adjacent sequences: A147820 A147821 A147822 * A147824 A147825 A147826
|
|
|
KEYWORD
| easy,nonn,base
|
|
|
AUTHOR
| Paolo P. Lava & Giorgio Balzarotti (paoloplava(AT)gmail.com), Nov 14 2008
|
|
|
EXTENSIONS
| Edited by Charles R Greathouse IV (charles.greathouse(AT)case.edu), Nov 01 2009
|
| |
|
|
