|
Search: id:A067453
|
|
|
| A067453 |
|
a(n) = binomial(a,b) where a>b and one of a and b is the product of the nonzero decimal digits of n and the other is the sum of the decimal digits of n. |
|
+0
1
|
|
| 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 1, 3, 1, 6, 28, 120, 495, 2002, 8008, 31824, 1, 4, 6, 84, 792, 6435, 48620, 352716, 2496144, 17383860, 1, 5, 28, 792, 12870, 167960, 1961256, 21474180, 225792840, 2310789600, 1, 6, 120, 6435
(list; graph; listen)
|
|
|
OFFSET
|
0,11
|
|
|
COMMENT
|
Program and terms from Robert G. Wilson.
|
|
MATHEMATICA
|
a = {}; Do[p = Apply[Times, IntegerDigits[n]]; s = Apply[Plus, IntegerDigits[n]]; a = Append[a, Binomial[Max[p, s], Min[p, s]]], {n, 1, 60}]; a
|
|
CROSSREFS
|
Sequence in context: A097462 A010889 A053831 this_sequence A118541 A084905 A137564
Adjacent sequences: A067450 A067451 A067452 this_sequence A067454 A067455 A067456
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Feb 05 2002
|
|
|
Search completed in 0.002 seconds
|
