|
Search: id:A109163
|
|
| |
|
| 3, 6, 10, 30, 42, 70, 22, 66, 330, 770, 2310, 130, 182, 546, 2730, 1430, 6006, 10010, 102, 510, 238, 3570, 1122, 2618, 442, 2210, 6630, 9282, 15470, 4862, 510510, 114, 266, 798, 2090, 6270, 14630, 1482, 7410, 17290, 16302, 27170, 570570, 646, 3230
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
EXAMPLE
|
The 5th prime is 11 (decimal), which is 1011 in binary. So a(5) is the product of the primes corresponding to the 1's of 1011, 2*3*7 = 42.
|
|
MATHEMATICA
|
Table[m = 1; o = 1; k1 = Prime[k]; While[k1 > 0, k2 = Mod[k1, 2]; If[k2 == 1, m = m*Prime[o]]; k1 = (k1 - k2)/2; o = o + 1]; m, {k, 1, 55}] - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Mar 19 2006
|
|
CROSSREFS
|
Cf. A019565.
Sequence in context: A115887 A068195 A080506 this_sequence A109490 A130760 A154134
Adjacent sequences: A109160 A109161 A109162 this_sequence A109164 A109165 A109166
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet Aug 18 2005
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Mar 19 2006
|
|
|
Search completed in 0.002 seconds
|