|
Search: id:A113581
|
|
|
| A113581 |
|
Define prime(0) = 1; then a(n) = product prime(d), where d ranges over all the decimal digits of n. |
|
+0
4
|
|
| 1, 2, 3, 5, 7, 11, 13, 17, 19, 23, 2, 4, 6, 10, 14, 22, 26, 34, 38, 46, 3, 6, 9, 15, 21, 33, 39, 51, 57, 69, 5, 10, 15, 25, 35, 55, 65, 85, 95, 115, 7, 14, 21, 35, 49, 77, 91, 119, 133, 161, 11, 22, 33, 55, 77, 121, 143, 187, 209, 253, 13, 26, 39, 65, 91, 143, 169, 221, 247, 299
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
a(14) = 14. a(17)=34.
|
|
EXAMPLE
|
a(123)= prime(1)*prime(2) *prime(3) = 2*3*5 = 30.
|
|
MATHEMATICA
|
f[n_] := Times @@ (IntegerDigits[n] /. {0 -> 1, 1 -> 2, 2 -> 3, 3 -> 5, 4 -> 7, 5 -> 11, 6 -> 13, 7 -> 17, 8 -> 19, 9 -> 23}); Table[ f[n], {n, 0, 69}] (* Robert G. Wilson v *)
|
|
CROSSREFS
|
Cf. A113580; A113735 gives positions where A113581(n)==0 (mod n).
Sequence in context: A117289 A106317 A095405 this_sequence A124180 A074721 A113580
Adjacent sequences: A113578 A113579 A113580 this_sequence A113582 A113583 A113584
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 06 2005
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Nov 07 2005
|
|
|
Search completed in 0.002 seconds
|
