|
Search: id:A023651
|
|
|
| A023651 |
|
(product of digits of n) * (sum of digits of n) = 2n. |
|
+0
1
|
| |
|
|
OFFSET
|
0,2
|
|
|
MATHEMATICA
|
Do[ If[ 2n == Apply[ Times, IntegerDigits[n]] Apply[ Plus, IntegerDigits[n]], Print[n]], {n, 0, 10^7} ]
|
|
CROSSREFS
|
2n = A007953(n) * A007954(n). Cf. A038369.
Sequence in context: A153712 A153711 A116049 this_sequence A116028 A153080 A075312
Adjacent sequences: A023648 A023649 A023650 this_sequence A023652 A023653 A023654
|
|
KEYWORD
|
nonn,base,fini
|
|
AUTHOR
|
Jason Earls (zevi_35711(AT)yahoo.com), Dec 11 2001
|
|
|
Search completed in 0.002 seconds
|
