

A109163


a(n) = A019565(nth prime).


0



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;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Table of n, a(n) for n=1..45.


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, Mar 19 2006 *)


CROSSREFS

Cf. A019565.
Sequence in context: A115887 A068195 A080506 * A109490 A130760 A154134
Adjacent sequences: A109160 A109161 A109162 * A109164 A109165 A109166


KEYWORD

nonn


AUTHOR

Leroy Quet, Aug 18 2005


EXTENSIONS

More terms from Stefan Steinerberger, Mar 19 2006


STATUS

approved



