A319344 a(n) = Product_{d|n, d>1} prime(A318881(d)), where A318881(d) records the prime signature of A000010(d).

1, 2, 3, 6, 5, 18, 7, 30, 21, 50, 7, 270, 11, 98, 195, 390, 17, 882, 11, 1950, 231, 98, 7, 17550, 55, 242, 231, 3234, 11, 76050, 19, 6630, 231, 578, 805, 145530, 29, 242, 759, 165750, 23, 106722, 19, 3234, 31395, 98, 7, 3878550, 133, 6050, 1581, 16698, 11, 106722, 805, 371910, 957, 242, 7, 252105750, 37, 722, 46893, 205530, 2255, 106722, 19

Offset

1,2

Links

Antti Karttunen, Table of n, a(n) for n = 1..8192

Formula

a(n) = Product_{d|n, d>1} prime(A318881(d)).

Prog

(PARI) A319344(n) = { my(m=1); fordiv(n, d, if((d>1), m *= prime(A318881(d)))); (m); }; \\ Needs also code from A318881

Crossrefs

Cf. A318881, A319342, A319345 (rgs-transform).

Cf. also A305984.

Sequence in context: A345129 A329354 A332461 * A260443 A328316 A206242

Adjacent sequences: A319341 A319342 A319343 * A319345 A319346 A319347

Keyword

nonn

Author

Antti Karttunen, Sep 17 2018

Status

approved