A342920 a(n) = A342002(A108951(n)).

1, 1, 1, 2, 1, 2, 1, 8, 12, 2, 1, 4, 1, 2, 6, 16, 1, 24, 1, 4, 6, 2, 1, 26, 50, 2, 16, 4, 1, 62, 1, 10, 6, 2, 126, 48, 1, 2, 6, 18, 1, 24, 1, 4, 46, 2, 1, 22, 1486, 100, 6, 4, 1, 32, 94, 8, 6, 2, 1, 54, 1, 2, 72, 20, 264, 12, 1, 4, 6, 120, 1, 376, 1, 2, 1142, 4, 242, 12, 1, 36, 342, 2, 1, 48, 272, 2, 6, 8, 1, 92, 318

Offset

1,4

Links

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

Index entries for sequences related to primorial base

Index entries for sequences related to primorial numbers

Formula

a(n) = A342002(A108951(n)) = A327860(A108951(n)) / A328572(A108951(n)).

Prog

(PARI)
A034386(n) = prod(i=1, primepi(n), prime(i));
A108951(n) = { my(f=factor(n)); prod(i=1, #f~, A034386(f[i, 1])^f[i, 2]) };
A342920(n) = A342002(A108951(n)); \\ Needs also code from A342002.

Crossrefs

Cf. A108951, A324886, A327860, A328572, A342002, A342463.

Sequence in context: A334730 A201453 A260897 * A066772 A104060 A062347

Adjacent sequences: A342917 A342918 A342919 * A342921 A342922 A342923

Keyword

nonn

Author

Antti Karttunen, Apr 06 2021

Status

approved