|
| |
|
|
A135205
|
|
Numbers n for which Sum_digits(n!!) is a multiple of Sum_digits(n).
|
|
2
| |
|
|
1, 2, 3, 4, 6, 9, 10, 11, 12, 15, 18, 20, 21, 24, 25, 27, 30, 32, 33, 36, 42, 45, 46, 54, 55, 63, 72, 75, 81, 88, 90, 91, 93, 100, 101, 102, 105, 108, 111, 112, 117, 120, 121, 122, 123, 124, 126, 127, 135, 141, 144, 153, 154, 156, 162, 171, 176, 180, 182, 189, 198
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
EXAMPLE
| 11 -> 11*9*7*5*3*1=10395 -> (1+0+3+9+5)/(1+1)=9
|
|
|
MAPLE
| P:=proc(n) local i, j, k, w, x; for i from 1 by 1 to n do w:=0; k:=i; while k>0 do w:=w+k-(trunc(k/10)*10); k:=trunc(k/10); od; x:=i; j:=i-2; while j >0 do x:=x*j; j:=j-2; od: k:=x; x:=0; while k>0 do x:=x+k-(trunc(k/10)*10); k:=trunc(k/10); od; if trunc(x/w)=x/w then print(i); fi; od; end: P(1000);
|
|
|
CROSSREFS
| Cf. A004152, A120390, A108825, A129980, A131954, A131955, A135204, A135206.
Sequence in context: A036561 A082976 A047419 * A145733 A111251 A047300
Adjacent sequences: A135202 A135203 A135204 * A135206 A135207 A135208
|
|
|
KEYWORD
| easy,nonn,base
|
|
|
AUTHOR
| Paolo P. Lava (paoloplava(AT)gmail.com), Nov 30 2007
|
| |
|
|
