A324887 - OEIS

A324887

a(n) = A108951(n) * A276086(A108951(n)).

2, 6, 30, 36, 210, 300, 2310, 120, 1260, 2940, 30030, 15000, 510510, 50820, 21176820, 3600, 9699690, 88200, 223092870, 288120, 2232166860, 780780, 6469693230, 42000, 645668100, 17357340, 11880, 12298440, 200560490130, 66555720, 7420738134810, 672, 66899572740, 368588220, 228227900600700, 216090000, 304250263527210

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

Index entries for sequences computed from indices in prime factorization

Index entries for sequences related to primorial base

Index entries for sequences related to primorial numbers

FORMULA

a(n) = A324580(A108951(n)) = A108951(n) * A324886(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]) }; \\ From A108951

A276086(n) = { my(i=0, m=1, pr=1, nextpr); while((n>0), i=i+1; nextpr = prime(i)*pr; if((n%nextpr), m*=(prime(i)^((n%nextpr)/pr)); n-=(n%nextpr)); pr=nextpr); m; };

A324886(n) = A276086(A108951(n));

A324887(n) = (A324886(n)*A108951(n));

CROSSREFS

Cf. A034386, A108951, A276086, A324580, A324886, A324888.

Permutation of A324577.

Sequence in context: A219196 A233358 A241557 * A346106 A330326 A006954

Adjacent sequences: A324884 A324885 A324886 * A324888 A324889 A324890

KEYWORD

nonn

AUTHOR

Antti Karttunen, Mar 30 2019

STATUS

approved