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

Author

Antti Karttunen, Sep 17 2018

Keywords

• nonn

Links

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

Crossrefs

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

Cf. also A305984.

Programs

PARI

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

Formula

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