|
| |
|
|
A128606
|
|
Numbers n for which the product of the squares of their digits, not equal to zero, can be divided by n.
|
|
0
| |
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 25, 36, 64, 128, 175, 384, 735, 768, 784, 1296, 1764, 2916, 3675, 5625, 7938, 18432, 28672, 34992, 36864, 39366, 46656, 69984, 82944, 96768, 139968, 165375, 236196, 275625, 297675, 354375, 442368, 497664, 524288, 589824, 746496
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
MAPLE
| P:=proc(n) local i, k, w; for i from 1 by 1 to n do w:=1; k:=i; while k>0 do w:=w*(k-(trunc(k/10)*10))^2; k:=trunc(k/10); od; if w>0 then if trunc(w/i)=w/i then print(i); fi; fi; od; end: P(1000000);
|
|
|
CROSSREFS
| Sequence in context: A096867 A100753 A132416 * A085123 A131571 A179988
Adjacent sequences: A128603 A128604 A128605 * A128607 A128608 A128609
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Paolo P. Lava & Giorgio Balzarotti (paoloplava(AT)gmail.com), May 08 2007
|
| |
|
|
