|
Search: id:A147824
|
|
|
| A147824 |
|
Minimum number k for which the digital sum of k*n is 4n. |
|
+0
3
|
|
| 0, 4, 4, 13, 22, 139, 133, 427, 1111, 1111, 49999, 40909, 49999, 69223, 357142
(list; graph; listen)
|
|
|
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=4*n then ok:=0; print(j); fi; od; od; end: P(100);
|
|
CROSSREFS
|
A147822, A147823, A147825-A147831
Sequence in context: A052993 A005301 A099924 this_sequence A019081 A059443 A097335
Adjacent sequences: A147821 A147822 A147823 this_sequence A147825 A147826 A147827
|
|
KEYWORD
|
easy,nonn,base,new
|
|
AUTHOR
|
Paolo P. Lava & Giorgio Balzarotti (ppl(AT)spl.at), Nov 14 2008
|
|
EXTENSIONS
|
Edited by Charles R Greathouse IV (charles.greathouse(AT)case.edu), Nov 01 2009
|
|
|
Search completed in 0.002 seconds
|
